дана строка .Определить :есть ли в данной строке буква "ш" (расская,маленькая буква) паскаль,помогите пожалуйста;)

Ответы

Ответ дал: Endok
0
var S:string;
begin
Writeln('Введите строку');
If not(Pos('ш',S)=0) then
Writeln('буква ш есть')
else
Writeln('буквы ш нету');
end.
Ответ дал: veta15
0
вы меня сегодня просто спасаете))
Ответ дал: Endok
0
Зачем на вы? Мне только 17 лет)
Похожие вопросы