Вопрос школьника по предмету Информатика
найдите координаты точки (x,y) делящий отрезок AB пополам, если известно, что его концы имеют координаты A(x1,y1) , B(x1,y2)
x=x2-x1поделить на 2 y=y2-y1поделить на 2
на языке паскаль
пожалуйста очень срочно
Ответ учителя по предмету Информатика
//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.
Похожие вопросы от пользователей
Дети спрятались от солнца под яблоней
1) Jack always brings flowers to his sister on her birthday.
2)Bill always invites his friends to birthday party
3)Tom’s uncle often visits his relatives
4)Amy often writes letters to her friend
5)Aunt Polly always sends presents to her cousin