Pascal a b c Вариант 1
//PascalABC.NET 3.2 сборка 1318 Var a,b:real; begin readln(a,b); write((a/(54*b)+4.89)/((-7.86-32+sqr(a))/(b*3.9))); end.