Дочке в школе задали задачку: Задачка по информатике: Компания выпустила лотерейные...

Question

Дочке в школе задали задачку:
Задачка по информатике:
Компания выпустила лотерейные билеты трех разрядов: для молодежи, для взрослых, для пенсионеров. Номера билетов каждого разряда лежат в пределах:
для молодежи-от 1 до 100;
для взрослых- от 101 до 200;
для пенсионеров-от 201 до 250.
С помощью компьютера выберите случайным образом лотерейный билет в каждом разряде.
Помогите пожалуйста!

Answer 1

Var m,v,p:integer;
begin
Randomize;
m:=Random(100)+1;
v:=random(100)+101;
p:=random(50)+201;
writeln(m,'  ',v,'  ',p);
end.