используя оператор выбора составить программы решения следующих задач. Составьте программу, определяющую для буквы английского алфавита, является ли буква гласной или нет

Задаем набор гласных букв: a, e, i, o, u, yВводим букву.Сравниваем ее с каждой буквой из набора.Если совпадает, отвечаем: ДАЕсли не совпало ни с одной, отвечаем: НЕТ.Пример на бейсикеSub LetterDim A(6) As String, S As String, i As Integer, F As BooleanA(1) = "a": A(2) = "e": A(3) = "i": A(4) = "o": A(5) = "u": A(6) = "y"Input SF = FalseFor i = 1 To 6     If S = A(i) Then F = TrueNext iIf F = True Then Print "YES" Else Print "NO"End