Pomoc w zadaniu z TP

[Piciu18 0]

Witam mam problem z zadaniem mianowicie chodzi o logarytm dziesiętny, mam wprowadzić liczby z klawiatury dla zmiennych

a i b. Następnie za pomocą podanych liczb obliczyć wyrażenie dla log a/b gdzie b jest pod pierwiastkiem kwadratowym, pamiętając, że (b > 0). Nie wiem jak się za to zabrać proszę o pomoc jakiegoś mistrza XD. Z góry dzięki za pomoc!!!

[Nerio 17]

http://4programmers.net/Turbo_Pascal/Math,_czyli_matematyka_studenta - poczytaj...

 

Zadanie trywialne...

[Piciu18 0]

dzięki po tym tropie natknąłem się na ten kod log_a(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!!!

Edytowane 17 Grudzień 2009 przez Nerio