F=|2x/y-x/y| X=0.4 Y=0.15
Program abc; var F,x,y:integer; begin x:=0.4; y:=0.15; F:=abs(2*x/y-x/y); writeln(F); end. Это в PascalABC