Здравствуйте, помогите пожалуйста решить задание по информатике: дано вещественное число А. Используя операцию умножения получить А28 за шесть операций.Спасибо
Program Anastas65;
var
A,X,Y:integer;
begin
write(Введите число A );
readln(A);
writeln(*** Alphaeus ***);
writeln(*** Получение А^28 за 6 ходов ***);
X := A*A; // получаем А^2
Y := X*A; // получаем А^3
X := X*X; // получаем А^4
Y := Y*X; // получаем А^7
Y := Y*Y; // получаем А^14
Y := Y*Y; // получаем А^28
writeln( Результат = ,Y);
writeln(**********************************);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
