Задано четырехзначное натуральное число 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.