Выполнить задания в программе Паскаль.Определить, Как узнать сколько раз в тексте встречается буква «и».В качестве входных данных введите текст, состоящий из Ваших фамилии, имени и отчества. В отчете представить код программы и результаты работы кода в виде скриншота.

Question

Lyuu

5 год назад

ОТВЕТЫ

Manning Cory

Oct 24, 2020

var i,m:integer;

n:string;

l:byte;

begin

m:=0;

writeln('Введите текст');

readln(n);

l:=length(n);

for i:=1 to l do begin

if n[i]='и' then m:=m+1 else if n[i]='И' then m:=m+1;

end;

writeln(m);

end.

P.S.Скрин сам сделаешь, имени я твоего не знаю

739