Ну, площадь круга, допустим, вычисляется по формуле
123-четырехричная(4) 10=302
222-трехричная(3) 10=211
111-двухричная(2) 10=1111
241-пятеричная(5) 10=400
AND
(решено вручную подстановкой, очень плохой метод, иных, увы, не знаю)
Var n,s,i:integer;
begin
write('Введите N: ');
readln(n);
for i:=1 to n do s:=s+i*i;
writeln('Ответ: ',s);
<span>end.</span>