Программа заполнения массива из 100 чисел случайными значениями из диапазоа от - 20 до 20. (паскаль)

Question

Информатика

Юнонка

5 марта, 14:18

Программа заполнения массива из 100 чисел случайными значениями из диапазоа от - 20 до 20. (паскаль)

+2

Ответы (1)

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

Эразм · Answer 1

const

n = 100;

var

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

i:integer;

begin

randomize;

for i : = 1 to n do

begin

a[i] : = random (41) - 20;

write (a[i], ' ') ;

end;

writeln;

end.