Регистрация
nikitatsyplyat
22.05.2022 05:11
Информатика
Есть ответ 👍

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

119
396
Посмотреть ответы 2

Ответы на вопрос:

VeronikaShubin
VeronikaShubin
4,7(81 оценок)
  var    s : string;     l,i,k,a : integer;     begin  readln (s);       l : = length(s);   k : = 0;   a : = 0;         for i : = 1 to l do    begin      if (s[i]=' ') or (i=l) then      begin        if a = 2 then            k : = k +1;         a : = 0      end      else      if s[i] ='a' then        a : = a +1;   end;     writeln(k);   end.
КучеренкоИнна
КучеренкоИнна
4,8(73 оценок)
//первое ////////////// var a, b, c, z: integer; begin writeln('введите число a'); readln(a); writeln('введите число b'); readln(b); writeln('введите число c'); readln(c); z: =a/b*c; writeln(z); end.

Популярно: Информатика