Вывести массив случайными числами в интервале [-10; 10]

Question

Информатика

Севастьян

10 июля, 14:45

Вывести массив случайными числами в интервале [-10; 10]

+5

Ответы (1)

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

Петрай · Answer 1

Var a: array [-10 ... 10] of integer;

i: integer;

begin

for i : = - 10 to 10 do a[i] : = random (100) ;

for i : = - 10 to 10 do writeln ('[', i, '] = > ', a[i]) ;

end.

В Паскале =)