Question

функция RANDOM (X) возвращает случайное целое число в диапазоне от 0 до Х-1. В переменную Y требуется поместить случайное целое число в диапазоне от 40 до 46 включительно

Answer 1

var y:integer;
...
y:=random(7)+40;