Вычислить медианы треугольника - QBasic

Формулировка задачи:

Прошу помочь написать на QBasic

Решение задачи: «Вычислить медианы треугольника»

Листинг программы

a = 3.7
b = 3.7
c = 3.7
ma = (1 / 2) * SQR(2 * b ^ 2 + 2 * c ^ 2 - a ^ 2)
mb = (1 / 2) * SQR(2 * a ^ 2 + 2 * c ^ 2 - b ^ 2)
mc = (1 / 2) * SQR(2 * a ^ 2 + 2 * b ^ 2 - c ^ 2)
PRINT "ma="; ma
PRINT "mb="; mb
PRINT "mc="; mc
END

Объяснение кода листинга программы

В этом коде вычисляются медианы треугольника. Переменные a, b и c содержат длины сторон треугольника. Медиана ma вычисляется как половина произведения суммы квадратов двух сторон на корень из двух и разности квадратов третьей стороны. Медиана mb вычисляется как половина произведения суммы квадратов двух сторон на корень из двух и разности квадратов третьей стороны. Медиана mc вычисляется как половина произведения суммы квадратов двух сторон на корень из двух и разности квадратов третьей стороны. Затем значения медиан выводятся на экран.