Question

Составить программу в Pascal, которая формирует одномерный массив случайным образом, случайные числа должны принадлежать отрезку [-4;3].

Answer 1

var a:array[1..10] of integer;   
i:integer;begin 
for i:=1 to 10 do  
begin     
a[i]:=-4+random(8);
write(a[i],' ');
end;
end.