witam mam taki program i mozecie powiedzic dlaczego on mi niepokauje wyniku
program matma ;
uses crt ;
var
m:real;
k:real;
f:real;
r:real;
const
g:real = 10;
begin
clrscr ;
writeln('Witamy w porgramie matemtycznym');
writeln('Podaj mase mezczyzny');
readln(m);
writeln('Podaj mase kobiety');
readln(k);
writeln('podaj odlegosc miedzy nimi');
readln(r);
f:= g*(m*k)/sqr(r);
writeln(f);
readkey;
end.
a wzór jest taki
F=Gkm/r^2