написать программу формирования массива из 10 чисел ( вод с клавиатуры) и подсчитать суммы элемента мпомагите пожалуйста
Ответы на вопрос
Ответил dfubyf
0
изи
var
massiv : array [1..100] of longint;
summa,i : longint;
begin
for i:=1 to 10 do begin readln(massiv[i]); summa:=summa+a[i]; end;
writeln(summa);
end.
var
massiv : array [1..100] of longint;
summa,i : longint;
begin
for i:=1 to 10 do begin readln(massiv[i]); summa:=summa+a[i]; end;
writeln(summa);
end.
Новые вопросы