Предмет: Информатика,
автор: Трэвис
Составьте программу, которая считает, сколько раз в тексте, заданном с клавиатуры, встречается буква "М"
Текст: Мой компьютер сломан
Ответы
Автор ответа:
0
Program A1;vara:string;b,i:integer;beginwriteln('Vvedi text');readln(a);b:=0;for i:=1 to length(a) do beginif copy(a,i,1)='м' then b:=b+1;end;writeln(b);end.
Похожие вопросы
Предмет: Қазақ тiлi,
автор: victoria270727
Предмет: Русский язык,
автор: nastamnnkuff
Предмет: МХК,
автор: milkamila92
Предмет: Математика,
автор: данила9