ИНФОРМАТИКА 8 КЛАСС ПОМОГИТЕ НА УРОВНЕ 8 КЛАССА!
Составьте алгоритм возведения четного числа в квадрат ,а нечетного к куб.
С помощью div и т.п.

спс

var a:integer;beginreadln(a);if a mod 2=0 then a:=a*a else a:=a*a*a; writeln('a = ',a); end.Пример:18a = 324