Предмет: Информатика,
автор: daniillashko
СРОЧНО СРОЧНО СРОЧНО
Приложения:
Ответы
Автор ответа:
0
Ответ:
program test;
var s: string;
i: integer;
begin
readln(s);
if s[1]=s[pos(' ',s)+1] then writeln('а) да')
else writeln('а) нет');
if s[pos(' ',s)-1]=s[pos(' ',s)+1] then write('б) да')
else write('б) нет')
end.
Похожие вопросы
Предмет: Английский язык,
автор: fomichev12321
Предмет: Русский язык,
автор: Инга131
Предмет: Русский язык,
автор: zhamal1165
Предмет: Русский язык,
автор: Adliyashka
Предмет: Математика,
автор: Аноним