Question

Составьте программу ,которая:считает, сколько раз в тексте, заданном с клавиатуры, встречается буква «М».решение паскаль через цикл 

Answer 1

Вот пример программы на языке Pascal, которая считает, сколько раз буква "М" встречается в тексте, заданном с клавиатуры:

program CountLetterM;
var
  text: string;
  count: integer;
  i: integer;
begin
  count := 0;
  
  writeln('Введите текст:');
  readln(text);
  
  for i := 1 to length(text) do
  begin
    if text[i] = 'М' then
      count := count + 1;
  end;
  
  writeln('Буква "М" встречается ', count, ' раз(а) в тексте.');
end.

Программа запрашивает у пользователя ввод текста и затем с помощью цикла проходит по каждому символу введенного текста. Если символ равен букве "М", то счетчик увеличивается на единицу. В конце программа выводит количество раз, которое буква "М" встречается в тексте.

Примечание: Этот пример программы написан на языке Pascal. Если вам нужно решение на другом языке программирования, пожалуйста, уточните это.