2)10
2*(10-1)+1=19; 2*(10-2)+1=17; 2*(10-3)+1=15; 2*(10-4)+1=13; 2*(10-5)+1=11; 2*(10-6)+1=9; 2*(10-7)+1=7; 2*(10-8)+1=5; 2*(10-9)+1=3; 2*(10-10)+1=1
Только первые 10, далее будут отрицательные значения
Uses
Math;
...
MyNumber:=RandomRange(Start, Stop);//1 вариант
MyNumber:=Random(Stop)+Start;//2 вариант. Для него не нужен модуль <span>Math;
</span>Start - От
Stop - До