Question

напишите программу, которая вводит два целых числа, a и b (a

Answer 1

var

i,a,b:integer;

begin

randomize;

readln(a,b);

for i:=1 to 5 do

 write(random(b-a+1)+a,' ');

end.