В конце строки нужно ставить точку с запятой
readln(x);
a:= 1/(x-5);
b:= 5/((x-7)*(x+3));
Весь исправленный код:
var a, b, x :real;
begin
end.
В конце строки нужно ставить точку с запятой
readln(x);
a:= 1/(x-5);
b:= 5/((x-7)*(x+3));
Весь исправленный код:
var a, b, x :real;
begin
readln(x);
a:= 1/(x-5);
b:= 5/((x-7)*(x+3));
end.