Составить программу, которая создает массив из 6 случайных чисел, принадлежащих [20; 120] и вычисляет сумму элементов этого массива.

Question

Информатика

Гурий

24 июля, 21:51

Составить программу, которая создает массив из 6 случайных чисел, принадлежащих [20; 120] и вычисляет сумму элементов этого массива.

+1

Ответы (1)

Знаете ответ?

Регина · Answer 1

Program gt;

var a:array[1 ... 6]of integer;

i, s:integer;

begin

randomize;

s:=0;

for i:=1 to 6 do

begin

a[i]:=random (101) + 20;

write (a[i],' ') ;

s:=s+a[i];

end;

writeln;

writeln (s) ;

end.