Массив А вводится с клавиатуры. Найти сумму его элементов. Размер произвольный. Составить программу.
Ответы
Ответ дал:
0
program Ok;
const n = 10;
var
A:array[1..n] of integer;
i,sum:integer;
begin
sum:=0;
for i:=1 to n do
begin
read(A[i]);
sum:=sum+A[i];
end;
writeln(sum);
end.
const n = 10;
var
A:array[1..n] of integer;
i,sum:integer;
begin
sum:=0;
for i:=1 to n do
begin
read(A[i]);
sum:=sum+A[i];
end;
writeln(sum);
end.
Похожие вопросы
2 года назад
2 года назад
2 года назад
9 лет назад