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

Question

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

Answer 1

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