Заполнить пропуски в программе возведения четного числа в квадрат,
а нечетного числа - в куб.

program z4;
var x: integer; {чиcло}
begin
writeln\('Введите число: '\);
readln\(x\);
_________________________
writeln \('x=', x\);
end.