Найдите координаты точки (x,y) делящий отрезок ab пополам, если известно, что его концы имеют координаты a(x1,y1) , b(x1,y2) x=x2-x1поделить на 2 y=y2-y1поделить на 2 на языке паскаль

wwwghg wwwghg    3   28.08.2019 22:50    0

Ответы
вопросник45 вопросник45  06.10.2020 01:28
//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию

begin
    var x1 := ReadReal('координаты A(x1,y1) =');
    var y1 := ReadLnReal();
    var x2 := ReadReal('координаты B(x2,y2) =');
    var y2 := ReadLnReal();
    
    Writeln('O(', (x1 + x2) / 2, ', ', (y1 + y2) / 2, ')');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика