var a,b,c: double; begin a:=0.29; b:=0.20; c:=a-b; if c=0.09 then writeln('Ok') else writeln('Error'); writeln(c); end.