4. Составите программу, выводящую значение вещественной переменной х равное значению
выражения (a+b)/а, где а и b задаются с клавиатуры. Очень срочно! ​

program aaa;

var x,a,b:real;

begin

    writeln('Vvedite a');

    readln(a);

    writeln('Vvedite b');

    readln(b);

    x:=(a+b)/a;

    writeln('x=',x);

    readln

end.