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

Question

Информатика

Маргоша

13 ноября, 01:43

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

+4

Ответы (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.