Дано число A. Вычислить A15, используя две вспомогательные переменные и пять операций умножения. Для этого последовательно находить A2, A3, A5, A10, A15. Вывести все найденные степени числа A.
uses PT4; var a, a2, a3, a5, a10, a15: real; begin Task('Begin28'); read(a); a2 := sqr(a); a3 := a * a2; a5 := a * sqr(a2); a10 := a5 * a5; a15 := a5 * a5 * a5; write(a2, a3, a5, a10, a15); end.