Дан одномерный массив а размер массива 10 найти сумму всех элементов массива

angelok200332 angelok200332    3   07.06.2019 09:40    0

Ответы
Irinad27 Irinad27  07.07.2020 07:21
Var i,sum:integer; a:array[1..10] of integer;
begin;
for i:=1 to 10 do readln(a[i]); next i;
sum:=0;
for i:=1 to 10 do sum:=sum+a[i]; next i;
writeln('Сумма элементов = ',sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика