НАПИСАТЬ ПРОГРАММУ РАЗДЕЛЕНИЯ ЧИСЛА НА РАЗРЯДЫ
ПЖЖЖ СРОЧНО ЗА ОТВЕТ ДАЮ 15 БАЛОВ заранее спасибо

Ответ:

var

  number: integer;

begin

   readln(number);

  for var i := 1 to number.ToString().Length do  

      writeln('Разряд ' + Power(10, i - 1) + ': ' + number.ToString()[i]);

end.