Question

Написать программу.С клавиатуры вводится число, если оно четное в:=а^2, если нечётное в:a^3

Answer 1

Readln ( a );
if a mod 2 = 0 then write ( a*a )
else
write ( a*a*a);
end.
в вар укажи; что число integer