Напишите программу, которая вводит два целых числа, a и b (a<b) и выводит ** экран 5...

Question

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

Comments

"вводит два целых числа" с клавиатуры?

---

наверное

Answer 1

var a, b, i, c :integer;
begin
   read (a, b); // вводим a и b 
   for i:=1 to 5 do
   begin
      c:=random(b-a)+a; // присваиваем рандомные числа в заданном промежутке
      writeln (c); // выводим число
   end;
end.