Паскаль (9 класс!) Напишите программу вычисления расстояния между двумя точками плоскости
5-9 класс
|
Program Distance;
Var
X1, Y1, X2, Y2, D: Real;
Begin
WriteLn('Введите координаты первой точки');
ReadLn(X1, Y1);
WriteLn('Введите координаты второй точки');
ReadLn(X2, Y2);
D := Sqrt(Sqr(X2 - X1) + Sqr(Y2 - Y1));
WriteLn('Расстояние между точками = ', D:2:2);
ReadLn;
End.
Другие вопросы из категории
Системный подход это.
Структура это.
Системный эффект это.
Читайте также
(x2,y2), (x3,y3). Напишите программу, позволяющую выяснить, какие из них находятся на максимальном расстоянии друг от друга, и вывести на печать значение этого расстояния. Вычисление расстояния между двумя точками оформите в виде процедуры.
2) Даны действительные числа Х и Y. Напишите программу, позволяющую вычислить значение следующего выражения:
Z=(signX + signY)*sign(X+Y),
строках.Вывод результата сопроводите пояснениями
2)Напишите программу ввода трех величин( А,В,С) на одной строке,рассчитайте и выдайте на экран на отдельной строке значение выражения: (А*В)/3,14 +3С.
3)Напишите программу вычисления длины окружности и площади круга одного и того же заданного радиуса R.
Решать на паскале...Помогите пожалуйста(((
Формула для нахождения расстояния: картинка снизу
И всё это в паскаль. Спасибо.