Сформировать случайное число в диапазоне 7 ; 17

var a:byte;

begin

randomize;

a:=random(11)+7;

writeln(a);

end.

PascalABC.NET 3.4.2, сборка 1887 от 30.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var a:=Random(7,17);

 a.Println

end.