Сначала сделал с рекурсивной функции, но затруднение было только с суммой элементов, по этому написал через цикл как впрочем и должно быть.
Console.WriteLine("Введите число");
int x = Convert.ToInt32(Console.ReadLine());
int y = x;
int sum = 0;
for (int i = 0; i < 4; i++)
{
y = x % 10;
x = x / 10;
Console.Write(y);
sum = sum + y;
}
Console.Write(" = " + sum);
Console.ReadLine();
var
r1, r2:real;
begin
write('R1 = '); readln(r1);
write('R2 = '); readln(r2);
writeln('Площадь кольца равна ', pi * (r1 * r1 - r2 *r2));
end.