Цикл с условием Опции

[Анна]

Дано целое число N (>0). Используя операции деления нацело и взятия остатка от деления, вывести все его цифры, начиная с самой правой (разряда едениц) на экран.


Пробелемы ..

uses crt;
var n: byte;

begin
clrscr;

writeln ('Введите число: '); readln (n);
N mod 10;

{ :( }

end.

Как с право на лево вывести цифры? Не знаю.

[Анна]

Мне одни нули выводит, если к примеру было число 547 - результат: 000

Это по программе Дож

Сообщение отредактировано: Анна - 3.12.2005 20:17