Question

Написать программу по вычислению формулы в pascal abc

Answer 1

var  y: real;  a, b: integer;
begin  writeln('Введите a: ');  read(a);  writeln('Введите b: ');  read(b);  y := (a + b) / (a * (b - 2));  writeln('Ответ: ', y);end.