Найти площадь прямоугольника - VB
Формулировка задачи:
Изначально было задание:даны 4 стороны, найти являются ли эти стороны прямоугольником.
Программный код который я составил:
Теперь надо переделать данный код, чтобы найти площадь прямоугольника.Помогите пожалуйста
а все не нада сам додумался)
Решение задачи: «Найти площадь прямоугольника»
textual
Листинг программы
Dim a!, b!, c!, d! a = InputBox("a") b = InputBox("b") c = InputBox("c") d = InputBox("d") If a = c And b = d Then MsgBox "ГќГІГ® ïðÿìîóãîëüГ*ГЁГЄ" MsgBox "S = " & a * b Else MsgBox "ГќГІГ® Г*ГҐ ïðÿìîóãîëüГ*ГЁГЄ!" End If
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д