Составьте программу: возведение чётного числа в квадрат, а нечётного - в куб

Составьте программу: возведение чётного числа в квадрат, а нечётного - в куб
Гость
Ответ(ы) на вопрос:
Гость
program n; var       x: integer; begin writeln('Введите число'); readln(x); if x mod 2=0 then writeln(x*x) else writeln(x*x*x); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы