2)
var a, b: real;
begin
a:=65897.7;
b:=4789.1894;
a:=a-b;
writeln(a);
end.
3)
var a, b, S: integer;
readln(a, b);
S:=a*b;
writeln(S);
2)
var a, b: real;
begin
a:=65897.7;
b:=4789.1894;
a:=a-b;
writeln(a);
end.
3)
var a, b, S: integer;
begin
readln(a, b);
S:=a*b;
writeln(S);
end.