Составьте блок-схему алгоритма, в котором нужно задумать число и добавить к нему 10,
если оно меньше 3; добавить к нему 20, если оно не меньше 3, но меньше 25; вычесть из него 1,
если оно не меньше 25.Выполните составленный алгоритм для чисел 2, 14; 30.
255
344
Ответы на вопрос:
Var s: string; k,i: integer; begin write('введите слово: '); readln(s); k: =0; for i: =1 to length(s) do if s[i]='е' then k: =k+1; writeln('в слове ',s,' буква а встречается ',k,' раз'); end.
Популярно: Информатика
-
hiopjkokop28.12.2022 15:50
-
dddddkkke25.12.2020 20:24
-
lfhnvjk200701.11.2021 08:33
-
ШколоЛОх20.07.2022 15:59
-
misselYT27.10.2021 07:54
-
oksanademyanov30.06.2020 11:57
-
erkisha14.05.2023 06:21
-
IronGold25.07.2022 09:38
-
Sultanika01.04.2020 06:46
-
Popyliarnich13.03.2021 11:41