Question

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

Answer 1

var a:integer;
begin
readln(a);
if a mod 2=0 then a:=a*a
 else a:=a*a*a;
 writeln('a = ',a);
 end.

Пример:
18
a = 324