Даны координаты двух точек, надо найти расстояние между ними - QBasic
Формулировка задачи:
Даны координаты двух точек. Найти расстояние между ними
Решение задачи: «Даны координаты двух точек, надо найти расстояние между ними»
textual
Листинг программы
CLS INPUT "X1,Y1 = "; x1, y1 INPUT "X2,Y2 = "; x2, y2 R = SQR((x1 - x2) ^ 2 + (y1 - y2) ^ 2) PRINT "RASTOYANIE ="; R END
Объяснение кода листинга программы
CLS— очистка экранаINPUTX1,Y1 =; x1, y1— ввод координат первой точкиINPUTX2,Y2 =; x2, y2— ввод координат второй точкиR = SQR((x1 - x2) ^ 2 + (y1 - y2) ^ 2)— вычисление расстояния между точками по формуле расстояния между двумя точками в декартовой системе координатPRINTRASTOYANIE =; R— вывод результата на экран
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д