Решите номер 4 в pascal ABC пожалуйста

Question

Решите номер 4 в pascal ABC пожалуйста

---

Answer 1

var answer: real;

x, y: integer;

begin

write('Введите x: ');

readln(x);

write('Введите y: ');

readln(y);

answer:=(x+y)/(x+1) - (x*y-12)/(34+x);

writeln(answer);

end.

Comments

Спасибо,это правильно?

---

Нет, я всегда пишу неправильные ответы (шутка)