Дано результати шкільного турніру з бігу на дистанції 100 м в якому брали участь 12 учасників визначте найбільший і найменший час бігу учасників змагань.
199
307
Ответы на вопрос:
Var s: string; i,b,m: integer; begin readln(s); b: =0; m: =0; for i: =1 to length(s) do if s[i]='а' then inc(b) else begin if m< b then m: =b; b: =0; end; writeln(m); end.
Популярно: Информатика
-
ytytuty28.12.2022 10:14
-
avladimirovna32413.11.2021 15:16
-
lena10199217.05.2020 01:29
-
iworld2rist09.11.2020 05:47
-
christihhh7517.06.2023 09:42
-
duplenkokrist905.11.2021 21:27
-
AmitJK31.01.2023 22:54
-
markinaalisa200303.02.2023 08:05
-
ilona12226.03.2022 11:07
-
toly2201.10.2022 17:10