С клавиатуры вводят слово и символ.Составьте программу,которая: проверяет,есть ли в этом слове заданный символ
С клавиатуры вводят слово и символ.Составьте программу,которая: проверяет,есть ли в этом слове заданный символ
Гость
Ответ(ы) на вопрос:
Гостьvar s:string; c:char; begin readln(s,c); if pos(c,s)<>0 then writeln('est') else writeln('netu'); end.
Не нашли ответ?
Похожие вопросы