Вывести на экран все цифры числа в определенном порядке

13.01.2013, 08:28. **Показов** 5722. **Ответов** 1

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

@CodeR · 13.01.2013, 09:49

Pascal

Var n:integer;
Begin
    write('Введите N: ');readln(n);
    While n>0 do
    Begin
      write(n mod 10,' ');
      n:=n div 10;
    End;
End.

Sene4kaZAVR
		1
	Вывести на экран все цифры числа в определенном порядке 13.01.2013, 08:28. Показов 5722. Ответов 1 Метки нет (Все метки) Дано целое число N>0.Вывести на экран все его цифры, начиная с самой правой(с разряда единиц).

	13.01.2013, 09:49

Решение