Помогите с информатикой. 10 класс. Получить случайное трехзначное число и вывести через...

Question

Помогите с информатикой. 10 класс.
Получить случайное трехзначное число и вывести через запятую его отдельные числа.
Получено число 123.
Его цифры 1,2,3.
Сроочно

Answer 1

Var a,b,c:real;
begin
a := random(9);
b := random(9);
c := random(9);
writeln(a,',',b,',',c);
end.