Запиши название обратного алгоритма и допиши его команды. брюки в порядок 1)начало 2)возьми 3)намочи 4)выстирай 5)высуши 6)зашей 7)погладь брюки 8)убери брюки на место 9)конец обратный алгоритм 1)начало 2)возьми брюки 3)сомни брюки 9)конец решите .
223
225
Ответы на вопрос:
Var i, n, max: integer; s: string; begin n : = 0; max : = 0; readln(s); for i : = 1 to length(s) do begin if(s[i] = '0') then n : = n + 1 else begin if(n > max) then max : = n; n : = 0; end; end; write(max); end.
Популярно: Информатика
-
знатокслава23.12.2021 12:50
-
swdw125.02.2021 22:21
-
Asuacom18.08.2020 04:23
-
Вика200303327.04.2020 02:29
-
miras3918.02.2023 02:35
-
mashakuznetsova21102.03.2022 06:46
-
elvira12724.09.2020 17:45
-
hoseokjkjk27.03.2020 01:46
-
jhghjlkuyfjy14.03.2021 02:30
-
марс5526.01.2020 22:39