Question

Пользуясь только операцией умножения, вычислить а20 за пять операций умножения, используя в вычислениях максимум одну дополнительную переменную. Провести три запуска:

а=2;

а=-2;

а=1.25

Answer 1

Ответ:

var

a, x: real;

begin

a := 1.25; { сюда число из данных }

{1} a := a * a; { 2 степень }

{2} a := a * a; { 4 степень }

{3} x := a * a; { 8 степень }

{4} a := a * x; { 12 степень }

{5} a := a * x; { 20 степень }

writeln('a^20 = ', a);

readln

end.

Объяснение:

А я сам не понял, как у меня это получилось, но с калькулятором сверил и все норм