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

Question

Информатика: Составьте алгоритм возведения четного числа в квадрат, а нечетного в куб

Зте · Answer

Program abc;var a,a1,b:integer;beginread(a);a1:=a;a1:=a div 2;if(a1=0) thenb:=Power(a,2) else b:=Power(a,3);writeln(b);end....