Составьте программу, которая проверяет, входит ли буква «P» в слово (ответ должен быть «да» или «нет»). На языке Паскаль
Ответы на вопрос
Ответил Леганда555
0
var
s: string;
begin
Read(s);
if pos('Р', s) <> 0 then
WriteLn('да')
else
WriteLn('нет')
end.
Леганда555:
функция pos возвращает 0 тогда, когда не найдена заданная подстрока
Новые вопросы