Помогите пожалуйста разобраться! Язык программирования Паскаль информатика 10 класс
С клавиатуры считываются координаты двух точек: x1, y1; х2, у2. Напишите программу, которая отобразит на экране длину отрезка, образованного этими двумя точками, и координаты его середины.
По дате
По рейтингу
program AB; {PascalABC}
USES CRT;
VAR x1,y1,x2,y2:real;
begin
writeln('':5,' wwedite koordinaty tochki! ');
WRITE('':5,'x1 = '); read(x1);
WRITE('':5,'y1 = '); read(y1);
WRITE('':5,'x2 = '); read(x2);
WRITE('':5,'y2 = '); read(y2);
writeln('':5,'|AB| = ','':1,sqrt(sqr(x2-x1)+sqr(y2-y1)):2:4);
writeln('':5,'koord.sered x =','':1,(x1+x2)/2,'':2,' y = ','':1,(y1+y2)/2);
END.
написать программу можно так: прочитать x1 y1 x2 y2 потом длина отрезка это корень из (x2-x1)^2 + (y2-y1)^2 а середина будет (x1+x2)/2 и (y1+y2)/2 вот и всё