Нужно выявить ошибки. program linur; var b,r: integer; x: real; begin write; readln(b,r,x); x: =-(b/r); write(’решение линейного уравнения ; x); end.

Program linur;
Var b,R:integer;x:real;
Begin
Write;
readln(b,R);
x:=-(b/R);
write('Решение линейного уравнения ',x);
end.

Write(’Решение линейного уравнения ;x ’);
запятую не поставили))