Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Помогите пожалуйста, я не понимаю как сделать :(
Дано вещественное число a. Не пользуясь никакими арифметическими операциями кроме умножения получить:
а) a^8 за четыре операции
б) а^9 за четыре операции

Ответ оставил Гость

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
  var a:=ReadReal(Введите число:);
  var y:=a*a; // a^2
  y:=y*y; // a^4
  y:=y*y; // a^8
  Write(a^8=,y,, a^9=);
  y:=y*a; // a^9
  Writeln(y)
end.

Тестовое решение
Введите число: 2.73
a^8=3085.32683368301, a^9=8422.94225595462

Версия для старых паскалей:

var
  a,y:real;
begin
  Write(Введите число: ); Read(a);
  y:=a*a; // a^2
  y:=y*y; // a^4
  y:=y*y; // a^8
  Write(a^8=,y,, a^9=);
  y:=y*a; // a^9
  Writeln(y)
end.