Ззапишите по правилам алгоритмического языка
Var x,y: real; begin readln(x, y); writeln((y-3*x)/(5-x*y)); end.