Begin18. Даны три точки $$A$$, $$B$$, $$C$$ на числовой оси. Точка $$C$$ расположена между точками $$A$$ и $$B$$. Найти произведение длин отрезков $$AC$$ и $$BC$$.
Решение:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
program Begin18; var A,B,C,AC,BC,product: Real; begin Write('Введите значение точки A: '); Readln(A); Write('Введите значение точки B: '); Readln(B); Write('Введите значение точки C: '); Readln(C); AC:=Abs(A-C); Writeln('Расстояние отрезка AC равно: ',AC); BC:=Abs(C-B); Writeln('Расстояние отрезка BC равно: ',BC); product:=AC*BC; Writeln('Произведение отрезков AC и BC равно: ',product); end. |
Другие задачи из раздела Begin можно посмотреть здесь.
Комментарии: