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

Question

Информатика

Мирра

22 октября, 21:23

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

+3

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

В Паскале =)