Ответ(ы) на вопрос:
Гость
Если я всё правильно понял, то должно быть так:
var a:integer;
begin
if a mod 2 = 0 then a:=a*a else a:=a*a*a;
write(a);
end.
Не нашли ответ?
Похожие вопросы