Поммогите кто чем может! Завтра задачи сдавать, а я сделал не все!

1) Дано натуральное число, получить число при прочтении его цифр справа на лево


2)расчитать значения для a, разных 2, 3, 4, 5,6 до 17

Z=3,5 t2 (КВАДРАТ) - 7t + 16
t=4a

3)дано натуральное число определить сумму квадратов его цифр

Помогите кто чем может!!!

?

Разложение числа на цифры

Это для 1-го, а для 3-го еще проще, переводишь число в строку (либо сразу вводи в виде строки) ну а потом в цикле

res := '';
for i := 1 to length(s) do
 res := s[i] + res;

на FAQ я ничё не нашёл, так что...... ссори!