Напишите программу, которая определяет, сколько раз в строке встречается слог 'МА

12.05.2014, 13:48. **Показов** 9456. **Ответов** 2

Студворк — интернет-сервис помощи студентам

Напишите программу, которая определяет, сколько раз в строке встречается слог 'МА'. Очень прошу, помогите!

@BadmanJohnson · 14.05.2014, 01:30

Доброго времени суток.

Pascal

var s:string;
    i,l,n:integer;
begin
    repeat
        writeln('vvedite stroku');
        readln(s);
        l:=length(s);
        n:=0;
        for i:=2 to length(s) do
        if s[i]='a' then n:=n+1;
        writeln(n);
    until l=0;
end.

@debbug · 14.05.2014, 02:15

BadmanJohnson у тебя ошибки.

Pascal

var s:string;c:integer;
begin
writeln('enter string');
 readln(s);
 while pos('ma',s)<>0 do begin inc(c);delete(s,pos('ma',s),2); end;
 write(c); readln;
end.

YewFloo
		1
	Напишите программу, которая определяет, сколько раз в строке встречается слог 'МА 12.05.2014, 13:48. Показов 9456. Ответов 2 Метки нет (Все метки) Напишите программу, которая определяет, сколько раз в строке встречается слог 'МА'. Очень прошу, помогите!

	14.05.2014, 02:15

Опции темы

Напишите программу, которая определяет, сколько раз в строке встречается слог 'МА

Решение