• Предмет: Информатика
  • Автор: radislav002
  • Вопрос задан 2 года назад

Найти сумму элементов в массиве из 10 элементов заданных используя рандом
Паскаль


radislav002: рандом от 1 до 1000

Ответы

Ответ дал: fovfabomi
1

var

 a: array[1..10] of integer;

 i,s: integer;

 begin

   s:=0;

   for i:= 1 to 10 do

   begin

     a[i]:=random(1,1000);

     s:=s+a[i];

   end;

   writeln(s);

 end.

Похожие вопросы