98 переаедите с паскаля на питон program zadbl; uses crt; var a,b,c,i,s: integer; m: array[1..30] of integer; begin s: =-1; for i: =1 to 30 do begin m[i]: =random(100); write(m[i]: 3); end; for i: =1 to 28 do begin if m[i]+m[i+1]+m[i+2]> s then begin a: =m[i]; b: =m[i+1]; c: =m[i+2]; s: =a+b+c; end; end; writeln(' a b c'); write(a: 3); write(b: 3); write(c: 3); readln; end. подробнее - на -
222
395
Ответы на вопрос:
Популярно: Информатика
-
gregsorvenkov04.04.2022 12:13
-
mkim711918.10.2020 02:49
-
jeneksoul199727.01.2022 11:36
-
dhgti14.03.2023 18:21
-
max7878986704.03.2023 02:44
-
20042007rbn22.09.2022 09:31
-
Школьниқ10.09.2022 22:45
-
ivanow34353637383927.07.2021 08:35
-
Leroy123456712.12.2022 04:49
-
Gregory1502.05.2021 02:40