Question

Срочно,нужно выявить ошибки.
Program linur;
Var b,R:integer;x:real;
Begin
Write;
readln(b,R,x);
x:=-(b/R);
write(’Решение линейного уравнения ;x);
end.

Answer 1

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

Answer 2

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