Возведение числа в степень подключите 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»

Листинг программы

a := 27;
writeln(Power(a, 1/3)); // Как и положено, в ответе тройка...

Объяснение кода листинга программы

Объявляется переменная a и присваивается ей значение 27.
Вызывается функция Power, которая принимает два аргумента: основание и показатель степени.
В качестве основания функции Power используется переменная a.
В качестве показателя степени функции Power используется значение 1/3.
Результат вычисления функции Power выводится на экран с помощью функции writeln.