Составить программу, которая определяет, является ли треугольник равносторонним. OpenOffice.org Basic
Составить программу, которая определяет, является ли треугольник равносторонним. OpenOffice.org Basic
Похожие вопросы
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Sub IsEquilateralTriangle()
Dim a As DoubleDim b As Double
Dim c As Double
a = InputBox("Введите длину стороны A:")
b = InputBox("Введите длину стороны B:")
c = InputBox("Введите длину стороны C:")
If a = b And b = c Then
MsgBox "Треугольник равносторонний"
Else
MsgBox "Треугольник не является равносторонним"
End If
End Sub