Вика на уроке информатики узнала, что в программах можно обрабатывать не только числа, но и буквы. Она решила написать программу, которая находила бы в слове молокоподобного количество букв о. Помоги юной программистке решить задачу, для этого добавь команды и значения в программу. Pascal var \(s\), \(a\): string; \(k\), \(i\), \(n\): integer; begin writeln('Ввведи слово'); readln(\(s\)); writeln('Какие буквы будем считать?'); readln(\(a\)); \(n:=\) length(\(s\)); \(k:=\) 2; for \(i\) \(:=\) \(1\) to \(n\) do begin if then ; end; writeln('В слове ', \(s\), ' ', \(k\), ' букв ', \(a\)); end. Протокол Входные данные молокоподобного о Выходные данные В слове молокоподобного букв о.
Задание

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

Помоги юной программистке решить задачу, для этого добавь команды и значения в программу.

Pascal
var \(s\), \(a\): string;

\(k\), \(i\), \(n\): integer;

begin

writeln('Ввведи слово');

readln(\(s\));

writeln('Какие буквы будем считать?');

readln(\(a\));

\(n:=\)length(\(s\));

\(k:=\) 0;

for \(i\) \(:=\) \(1\) to \(n\) do

begin

if s[i]=a then

k:=k+1;

end;

writeln('В слове   ', \(s\), '   ', \(k\), '  букв   ', \(a\));

end.

Протокол

Входные данные

молокоподобного

о

Выходные данные

В слове молокоподобного 7 букв о.