program CalculateX;
var
a, b, x: real;
begin
writeln('Введите значение a: ');
readln(a);
writeln('Введите значение b: ');
readln(b);

x := (a + b) / (a * b);

writeln('Результат расчета x = ', x);
end.