Hab das mal versucht so zu programmieren, aber die Werte stimmen noch nicht.
Wenn jemand sich nochmal den Quelltext anschauen könnte?
Delphi-Quellcode:
p:=0.013869/100;
luft:=strtofloat(edit4.Text);
h2:=ln(1000*(1-p))/ln(luft);
edit3.text:=floattostrf(h2,fffixed,10,2);
Bei einem Druck von z.B.: 933hpa müssten 500 Meter herauskommen.