Имеется код калькулятора, который должен складывать/отнимать/умножать/делить два числа.
Module Module1
Sub Main()
Console.WriteLine("Enter the first digit... ")
Dim x As Integer = Console.ReadLine()
Console.WriteLine("Enter the second digit... ")
Dim y As Integer = Console.ReadLine()
Console.WriteLine("Choose operation(+, -, /, *)")
If Console.ReadLine() = "*" Then
Console.WriteLine(x * y)
Console.ReadLine()
ElseIf Console.ReadLine() = "/" Then
Console.WriteLine(x / y)
Console.ReadLine()
ElseIf Console.ReadLine() = "+" Then
Console.WriteLine(x + y)
Console.ReadLine()
ElseIf Console.ReadLine() = "-" Then
Console.WriteLine(x - y)
Console.ReadLine()
End If
End Sub
End Module
Но происходит:
После ввода знака операции с числами и трёх нажатий Enter командная строка пропадает.
Возможно, я не правильно присваивал значения переменным или не так вывел результат.
*
надо ввести 1 раз;/
- 2 раза,+
- 3 раза,-
- 4 разаif-else
в каждом условии Вы инициируете новый ввод со стороны пользователя. Один раз считайте строку, засунув значение в переменную, а дальше проверяйте значение переменной)ReadLine
до блокаif
, запишите результат в переменную, а потом это значение переменной проверяйте внутриif
.