Написать программу для вычисления значения выражения d+(d^2-25)/c
Var d,c:integer; s:real; begin readln(d,c); s:=d+(d*d-25)/c writeln(s); end.