Если число положительное,то его возвести в квадрат, иначе возвести в куб.
begin
writeln(vvedite n);
readln(n);
if n>0 then n:=sqr(n);
if n<0 then n:=sqr(n)*n;
writeln(n);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
