Pascal :

var
a:real;
begin
a:=(9.6*6-(9.6*6-9.4*5)-(9.6*6-9.8*5))/4;
write(a:0:1);
end.