Задано четырехзначное натуральное число X. Получить из него число,записанное теми же цифрами ,но в обратном порядке,а так же сумму исходного и полученного числа.

c#: for (int i = n; i >= 1; i--) {                 Console.WriteLine(i + ","); } pascal, еле перевел.. uses crt; var   num, conv, i : integer; beginwrite('Введите четырехзначное число : '); readln(num); conv := 0; while (num >0) do   begin      i := num mod 10 ;       conv := conv*10 + i ;     num := num div 10;  end; writeln('Число задом наперед :D: ', conv); readln; end.