НатаЛини
28.07.2020 13:02

Задайте массив из 5 случайных элементов. выведите на экран сумму его элементов и сами элементы. паскаль

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
yashchenko04
08.10.2020 13:12
PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(5,-99,99); a.Println;
  Writeln('Сумма элементов равна ',a.Sum)
end.

Пример
21 -79 -52 57 -64
Сумма элементов равна -117
0,0(0 оценок)
Ответ:
Кристи1801
08.10.2020 13:12
Var a:array [1..5] of integer;
i,s:integer;
begin
for i:= 1 to 5 do a[i]:= Random(51);
writeln(a);
for i:=1 to 5 do s:=s+a[i];
writeln(s)
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота