Записать программу которая находит сумму элементов целочисленного массива,абсолютная величина которых больше 20
236
391
Ответы на вопрос:
Var i,o: integer; a: array [1..20] of integer; begin for i: =1 to 20 do begin readln (a[i]); o: =o+a[i] end; writeln(o) end.
Популярно: Информатика
-
Танюня12312544319.05.2021 00:21
-
ygorbrusnyak12.05.2022 09:46
-
ritkamargaritka119.10.2020 03:58
-
micha19797928.05.2021 07:54
-
рута215.09.2020 21:42
-
iratsymbal711.05.2022 06:26
-
andriyianna19.09.2021 00:09
-
Ailina2406.09.2022 11:07
-
ozilpro22810.04.2021 08:58
-
popova201509.06.2022 12:07