Ответы на вопрос:
Var i, sum: integer; a: array [1..20] of integer; begin for i: = 1 to 20 do read(a[i]); sum : = 0; for i : = 1 to 20 do sum : = sum + a[i]; write(sum); end.
Популярно: Информатика
-
zorynastya05.08.2020 20:54
-
фрешграфф10.01.2021 17:10
-
Ruta1234027.04.2021 02:49
-
bkonok83220.06.2023 13:40
-
Вова337134629.08.2022 20:35
-
илья2006702.08.2021 07:01
-
mariakyzminova11.06.2021 19:21
-
Dasha2k1828.07.2021 13:00
-
blowwwwwwww20.05.2023 07:08
-
arturshubin2411.01.2020 02:29