Question

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

Answer 1

var S:string;
begin
Writeln('Введите строку');
If not(Pos('ш',S)=0) then
Writeln('буква ш есть')
else
Writeln('буквы ш нету');
end.

Answer 2

вы меня сегодня просто спасаете))

Answer 3

Зачем на вы? Мне только 17 лет)