. Разработать схему алгоритма, который вводит массив из 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
Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.