Сос сегодня надо будьте ! паскаль работа сгенерировать случайное число из промежутка квадратная скобка150,200) и выделить его первую и последнию

Первая цифра всегда будет = 1.
var n:integer;
begin
Randomize;
n:=random(50)+150;
writeln('n = ',n);
writeln('Первая цифра = ',n div 100);
writeln('Последняя цифра = ',n mod 10);
end.

Пример:
n = 164
Первая цифра = 1
Последняя цифра = 4