Сформировать случайное число в диапазоне 7 ; 17
begin
var a:=Random(7,17);
a.Println
end.
var a:byte;
randomize;
a:=random(11)+7;
writeln(a);