Получить число и определить, попадает ли оно в диапазон - VB
Формулировка задачи:
1.Получить число и определить, попадает ли оно в диапазон [5, 15) или в диапазон (25, 35] .
Решение задачи: «Получить число и определить, попадает ли оно в диапазон»
textual
Листинг программы
Sub Main()
Console.WindowWidth = 60
Console.WindowHeight = 30
Console.ForegroundColor = ConsoleColor.Yellow
Dim S As Single
Console.WriteLine("Введите число")
S = Console.ReadLine()
If S >= 5 And S < 15 Then
Console.WriteLine("Число " & S & " попадает в полуинтервал [5;15)")
Elseif S > 25 And S <= 35 Then
Console.WriteLine("Число " & S & " попадает в полуинтервал (25;35]")
Else
Console.WriteLine("Число " & S & " не попадет ни в полуинтервал [5;15), ни в полуинтеравал (25;35]")
End If
Console.ReadKey()
End Sub