Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   PHP, PERL, MySQL, JavaScript (https://forum.antichat.xyz/forumdisplay.php?f=37)
-   -   взведение в степень, как? (https://forum.antichat.xyz/showthread.php?t=55844)

rubik-nerubik 15.12.2007 16:07

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

e^x

e^-x

demonoid 15.12.2007 16:18

Код:

perl -e "print exp 2"
perl -e "print exp -2"

+
Код:

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


rubik-nerubik 15.12.2007 16:22

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

freddi 15.12.2007 16:28

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

rubik-nerubik 15.12.2007 16:32

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

halkfild 15.12.2007 16:49

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



Цитата:

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. просто пример))


Время: 04:16