Исправьте код: var a,b: real; / координаты точек r: real; // расстояние между точками **...

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.