Вопрос по информатике:
Напишите наиболее короткие вычисления выражений: x^45, x^21,
x^17, x^11
в выражениях можно использовать лишь сложение, вычитание, умножение. не использовать power, через sqr
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 11.11.2015 16:19
- Информатика
- remove_red_eye 8299
- thumb_up 24
Ответы и объяснения 1
r:=Sqr(Sqr(Sqr(Sqr(x))*x))*x; // 21
r:=Sqr(Sqr(Sqr(Sqr(x))))*x; // 17
r:=Sqr(Sqr(Sqr(x))*x)*x; // 11
Пример полной программы, реализующей такой алгоритм
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
function Dec2Bin(x:integer):string;
begin
var t:=x;
var r:string:='';
while t>=2 do (r,t):=(t mod 2+r,t shr 1);
Result:=t+r
end;
function Pow(x:real;n:integer):real;
// Быстрое возведение в степень "слева направо"
begin
var m:=Dec2Bin(n);
Result:=x;
for var i:=2 to m.Length do begin
Result:=Sqr(Result);
if m[i]='1' then Result*=x
end
end;
begin
var x:=ReadReal('Укажите основание х:');
var n:=ReadInteger('Укажите степень n:');
Writeln(x,'^',n,' = ',Pow(x,n))
end.
Примеры
Укажите основание х: 0.918
Укажите степень n: 39
0.918^39 = 0.0355520433528712
Укажите основание х: -2
Укажите степень n: 15
-2^15 = -32768
Укажите основание х: 12.6
Укажите степень n: 23
12.6^23 = 2.03480378921486E+25
- 12.11.2015 14:42
- thumb_up 26
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.