Question

Составить программу, решающую следующую задачу: Дано число a. Не пользуясь никакими другими операциями кроме умножения, получить a в 9 степени за 4 операции

Answer 1

var a, a1: real;

begin

   readln(a);

   a1:= a * a * a; // итого 2 операции

   writeln(a1 * a1 * a1) // итого 2 + 2 = 4 операции

end.