var
number: integer;
begin
readln(number);
for var i := 1 to number.ToString().Length do
writeln('Разряд ' + Power(10, i - 1) + ': ' + number.ToString()[i]);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var
number: integer;
begin
readln(number);
for var i := 1 to number.ToString().Length do
writeln('Разряд ' + Power(10, i - 1) + ': ' + number.ToString()[i]);
end.