Получить случайное трехзначное число и вывести через запятую все его отдельные цифры. Сделать для программы Паскаль! с помощью функций div и mod

Предыдущий
вопрос Следующий
вопрос

program RandomNumber;

var
number, digit1, digit2, digit3: Integer;

begin
Randomize;

number := Random(900) + 100;

digit1 := number div 100;
digit2 := (number mod 100) div 10;
digit3 := number mod 10;

Writeln('Random three-digit number: ', number);
Writeln('Digits separated by commas: ', digit1, ', ', digit2, ', ', digit3);

end.