Задачка на Паскале

[Кольчик]

Надо написать программу, вот по такому заданию:
Найти число, получаемое выписыванием в обратном порядке цифр заданного натурального числа.(используя массивы).

Проблема в том, что я пропустил тему, сдавать надо, помогите разобраться что надо использовать!

[PAV]

Не очень понятно, какую именно тему Вы пропустили. Это очень простое упражнение на базовые основы программирования. Если Вы умеете в принципе писать программы - то не очень понятно, в чем именно тут проблема. А если не умеете - то что хотите, чтобы Вас тут этому с нуля научили, или же написали программу за Вас? Ни того, ни другого здесь никто делать не будет. Уточните, в чем именно затруднение, и начите писать сами, тогда еще о чем-то можно говорить.

А что, использование массивов обязательно? По-моему, без них гораздо проще можно сделать все.

[Кольчик]

Я пропустил массивы!

[PAV]

Почитайте, например, здесь

(найдено меньше чем за минуту с помощью яндекса)

[Zai]

Кольчик писал(а):

Надо написать программу, вот по такому заданию:
Найти число, получаемое выписыванием в обратном порядке цифр заданного натурального числа.(используя массивы).

Проблема в том, что я пропустил тему, сдавать надо, помогите разобраться что надо использовать!

В обработке графических файлов CAD/CAE программ, которые нумеруются натуральными числами часто надо восстановить цифры для открытия файлов с соответствующим именем.
Если переменные integer и число i меньше 1000,
то первая цифра i1=i/100
вторая цифра i2=(i-i1*100)/10
третья цифра i3=i-i1*100-i2*10

[alexrey036]

т.е. нужно при необходимости добавить слева нули?
В FPC это делается как-то так:

S:=Format('%.3d',[val]);

где val - натуральное число, S - строка, дополненная нулями.

[Кольчик]

А как связать с массивами?

[Bini]

бррр обычно все намного проще, например для числа 1234

1234 div 1000 = 1
(1234 div 100) mod 10 = 2
(1234 div 10) mod 10  = 3
1234 mod 10 = 4

вроде так, найденые цифры скорей всего заносится в масив

for i:=1 to 3 do a[i]:=n

который потом следует вывести в обратно порядке

for i:=3 downto 1 do writeln(a[i])

в вашем случае, как мне кажется, задача намного проще, заданное число просто вводится как элементы масива

for i:=1 to 3 do readln(a[i]);