Составить программу на определение суммы элементов массива( одномерный двумерный)
Составить программу на определение суммы элементов массива( одномерный двумерный)
Гость
Ответ(ы) на вопрос:
ГостьВот программа для массива состоящих,например из 7 чисел
var
a:array[1..7]of integer;
i,n,m:integer;
begin
m:=0;
Writeln('введите числа:');
For i:=1 to 7 do
Readln (a[i]);
for i:=1 to 7 do
m:=a[i]+m;
writeln(m);
end.
Не нашли ответ?
Похожие вопросы