Записать программу которая находит сумму элементов целочисленного массива,абсолютная величина которых больше 20

samsungtaba32 samsungtaba32    3   12.09.2019 20:00    0

Ответы
nikita030303b nikita030303b  07.10.2020 10:20
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика