. Разработать схему алгоритма, который вводит массив из 10 целых чисел и выводит на экран сам массив и сумму всех его элементов.
Ответы на вопрос
Ответил ShirokovP
0
var A: array [1..10] of integer;
I,S: integer;
begin
for I:=1 to 10 do begin
a[i]:=random(10);
S:=S+A[I];
write(a[i],' ');
end;
writeln;
writeln ('summa=',S);
end.
I,S: integer;
begin
for I:=1 to 10 do begin
a[i]:=random(10);
S:=S+A[I];
write(a[i],' ');
end;
writeln;
writeln ('summa=',S);
end.
Ответил Аноним
0
Спасибо большое
Ответил Аноним
0
Ты супер
Новые вопросы