Как в паскале записать выражение: 2^3x/3ln2 ?

Код программы:

power(2, 3*x)/3*ln(2)

exp(((3*x)/(3*ln(2)))*(ln(2)))

Объяснение:

Возведение в любую степень: exp(A*(ln(B))), то есть это будет B^A

3x = (3*x)

3ln2 = (3*ln(2))

A = 3x/3ln2 = ((3*x)/(3*ln(2)))

B = 2

Далее подставляем:

1) exp(A*(ln(2))) (Число B)

2) exp(((3*x)/(3*ln(2)))*(ln(2))) (Подставляем степень, то есть A)

Программа Pascal:

var x,s:real;

begin

 readln(x);

 s:=exp(((3*x)/(3*ln(2)))*(ln(2)));

 writeln(s);

end.