Предмет: Информатика,
автор: Larry1d11
Помогите расписать задачу на язык Паскаль
Приложения:

Ответы
Автор ответа:
0
program z_1;
var x1, y1, x2, y2, AB: real;
begin
writeln ('Введите координаты точек A и B:');
readln (x1, y1, x2, y2);
AB:=sqrt(sqr(x1-x2)+sqr(y1-y2));
writeln('Расстояние от точки A до B равно', AB);
end.
А вторая даже для меня сложновато
Интересные вопросы
Предмет: Литература,
автор: David2468097531
Предмет: Химия,
автор: animeshnitsa44
Предмет: Другие предметы,
автор: zhuravoleg10
Предмет: Математика,
автор: 45n1