. Разработать схему алгоритма, который вводит массив из 10 целых чисел и выводит на экран сам массив и сумму всех его элементов.

Олеся Олеговна в категроии Информатика, вопрос открыт 03.03.2018 в 18:15

1 ответ

[email protected] , ответ добавлен 03.03.2018 в 18:26

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.

 0   

Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или  авторизируйтесь на сайте чтобы оставить ответ на вопрос.