Question

Исправьте код:
var
a,b: real; / координаты точек
r: real; // расстояние между точками на прямой
bigin
write('Введите координату точки a: ');
readln(a);
write('Введите координату точки b: ');
readln:(b);
r = abs(a-b);
writelen('Расстояние между точками = ' r);
end

Answer 1

var  

a,b: real; // координаты точек  

r: real; // расстояние между точками на прямой  

begin  

write('Введите координату точки a: ');  

readln (a);  

write('Введите координату точки b: ');  

readln (b);  

r := abs(a-b);  

writeln('Расстояние между точками = ' ,r);  

end.