Visual Basic Используя условный оператор if…then, if…then…else или if…then…elseif, разработайте проект для решения следующих заданий: - VB

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

Пройдет ли кирпич со сторонами а, b и с сквозь прямоугольное отверстие со сторонами p и q? Стороны отверстия должны быть параллельны граням кирпича. За ранее спасибо!

Решение задачи: «Visual Basic Используя условный оператор if…then, if…then…else или if…then…elseif, разработайте проект для решения следующих заданий:»

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

                            a=array(1,2,3)
y=9
for i = 0 to ubound (a)
 if a(i)<y then
  y=a(i)
 end if
next
                        