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

Var x:integer; 
begin 
randomize; 
x:=random(1000); 
writeln(x); 
writeln(x div 100,,, x div 10 mod 10,,, x mod 10); 
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку