Составьте пожалуйста программу ** Паскале (1). Только правильно!

Question

Составьте пожалуйста программу на Паскале (1). Только правильно!

---

Answer 1

Var x, a, b: real;
begin
wreteln("Введите a и b");
reeadln(a, b);
x:= (a*b)/(sqr(a) - sqr(b));
writeln(x);
end.