Возведение числа в степень подключите Math - Free Pascal
Формулировка задачи:
чтобы не мучить мозг экспонентами и прочими премудростями
в раздел uses напишите имя модуля Math
и тогда с помощью функции Power можете вычислить любую
степень числа , правда число будет вещественного типа
даже если укажете число целого типа, но это легко поправимо
вот код
var a : integer;
begin
a:= 10;
writeln(Power(a,2));//a во 2 -й степени
//результат тип real на экране = 1.0000...E+0002
writeln(Power(a,2):0);
//результат тип real на экране = 100
writeln(trunc(Power(a,2)));//trunc возвращает целую часть вещественного числа
//результат тип integer на экране = 100
end;Решение задачи: «Возведение числа в степень подключите Math»
textual
Листинг программы
a := 27; writeln(Power(a, 1/3)); // Как и положено, в ответе тройка...
Объяснение кода листинга программы
- Объявляется переменная
aи присваивается ей значение 27. - Вызывается функция Power, которая принимает два аргумента: основание и показатель степени.
- В качестве основания функции Power используется переменная
a. - В качестве показателя степени функции Power используется значение 1/3.
- Результат вычисления функции Power выводится на экран с помощью функции writeln.