Составьте программу, которая считает, сколько раз в тексте, заданном с клавиатуры, встречается

буква "М"

Текст: Мой компьютер сломан

в бейсике

Question

Архип

3 марта, 05:12

+5

Ответы (1)

Знаете ответ?

Панкрат · Answer 1

Input"введите текст"; a$

For i=1 to len (a$)

if mid$ (a$, i, 1) = "М" then s=s+1

next

print " Количество букв = " s

end

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