Программа вычисления площади треугольника по формуле Герона qbasic