Пользуясь ограничениями предыдущей задачи,(в арифметических выражениях можно использовать только операции сложения,вычитания и умножения,каждое выражение может содержать только одну арифметическую операцию.)напишите наиболее короткие алгоритмы вычесления выражений: y=x в восьмой степени,y=x в десятой степени, y=x в пятнадцатой степени,y=x в девятнадцатой Постарайтесь использовать минимальное количество дополнительных переменных.Выполните трассировку алгоритмов. Сделайте пожалуйста на листочке сфоткайте и пришлите сюда плииз rafaelbuberenko@mail.ru отдам 40 очков

универсальное

var i,n,x,y:integer;

Begin

  read(x,n);

  for i := 1 to n do

    y:= y*x;

  writeln(y);

End.

частные

y=x*x | x^2

y=y*y | x^4

y=y*y | x^8

a=x*x

y=a*a

y=y*y

y=y*a = x^10

y=x*x

y=y*y

y=y*y

y=y*y = x^16

y=y/x = x^15