- основание четное, смотрим на последнюю цифру, это 0 - четная цифра, значит все это число четное.
- основание четное, смотрим на последнюю цифру, это D 13, цифра 13 не четное, значит число не четное
- основание четное, см на последнюю цифру, это A - 10, четная цифра, четное число.
- основание не четное, см на сумму цифр: 3+2=5, 5 не четное, число не четное
- основание четное, см на последнюю цифру 3 - не четное, число не четное
- основание не четное, см на сумму цифр: 3+5 = 8, четное, число четное., ,
var
x, y: integer;
begin
Read(x);
x := x * x;
y := x * x;
y := y * 5;
y := 1 + y;
y := y - x;
y := y * y;
Writeln(y)
end.