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

Вот

var a, b: real; i: integer;

begin

randomize;

readln(a,b);

for i:= 1 to 5 do

write((Random()*(b-a)+a):0:3, ' ');

end.