Что не так ?
Program Primer4;
var s,b, w:real;
begin
readln(s,b);
w;=9*s-32*b
writeln(w);
end.

---