dzięki po tym tropie natknąłem się na ten kod loga(x)=ln(x)/ln(a) który niby ma obliczać logarytm dziesiętny.Wprowadziłem go do programu trochę modyfikując tak aby był zgodny z tą własnością:
Program wykonałem pod to działanie:
var a,b,y,x,p,wynik: real;
begin
readln( a );
readln( b );
p:=sqr( b );
y:=(ln(a) / ln(10));
x:=(ln(p) / ln(10));
wynik:=y-x;
write('Wynik działania wynosi: ',wynik);
readln;
end.
Proszę o ewentualne poprawki bo już sam nie wiem czy on chodzi poprawnie
I jak by ktoś mógł to niech wstawi tam if (b > 0) bo non stop błędy mi wyskakują i niewiem o co be Z góry dziękuje i pozdrawiam!!!