С клавиатуры вводятся два числа требуется найти куб максимального из них
С клавиатуры вводятся два числа требуется найти куб максимального из них
Гость
Ответ(ы) на вопрос:
ГостьProgram ww;
Uses crt;
Var a,b,p:integer
Begin
Readln(a,b);
If a>b then p:=a*a*a;
else p:=b*b*b;
Writeln(p);
End.
Не нашли ответ?
Похожие вопросы