Решить задачу срочно пожалуйст

0 интересует 0 не интересует
87 просмотров

Решить задачу срочно пожалуйст


image

спросил от (32 баллов) в категории Информатика
1 Ответ
0 интересует 0 не интересует
ответил от Начинающий (106 баллов)

Program ryazantsev;
var str1, str2: string;
begin
readln(str1);
readln(str2);
if Pos('a', str1)=0 then writeln(str1);
if Pos('a', str2)=0 then writeln(str2);
end.

...