взведение в степень, как?

[rubik-nerubik]

люди, как взвести допустим(паскаль)
експоненту в x ???
и експоненту в минус x

e^x

e^-x

[demonoid]

perl -e "print exp 2"
perl -e "print exp -2"
+
perl -e "print '2.718281828459045'**2"
perl -e "print '2.718281828459045'**-2"

[rubik-nerubik]

на паскале -) забыл написать
например в квадрат
sqrt(e)
а как в x

[freddi]

e^x будет exp(x)
x^y будет exp(y*ln(x))

[rubik-nerubik]

всё, тема раскрыта всем спасибо.

[halkfild]

очень старая лаба))))) возведение в степень без использования спец функций
метод ускореного умножения




program grade;
var
y, d : integer;
S, x, z : real;

BEGIN
writeln('Введiть основу x:');
readln(x);
writeln('Введiть показник y:');
readln(y);

if (x=0) then
begin
if (y>0) then
begin
S:=0;
writeln('Результат: ',S:4:0);
end
else writeln('Значення не знайденi');
end
else
begin
d:=abs(y);
z:=x;
S:=1;
repeat
begin
if ((d mod 2)=1) then S:=S*z;
z:=z*z;
d:=d div 2;
end
until (d<=0);

if (y<0) then S:=1/S;

writeln('Результат: ',S:4:4);
end;
END.


p.s. просто пример))