猜字游戏（）
猜字游戏（）
杨硕（网二） 周五 三月 21, 2008 11:42 am
Sub Main()
Dim A As Int16 = Console.ReadLine()
If A = 1 Then
Console.WriteLine("GOOD,NEXT")
Else : Console.WriteLine("TRY AGAIN")
End If
Dim B As Int16 = Console.ReadLine()
If B = 2 Then
Console.WriteLine("GOOD,NEXT")
End If
Dim C As Int16 = Console.ReadLine()
If C = 3 Then
Console.WriteLine("GOOD,FINISH")
End If
End Sub
End Module
Dim A As Int16 = Console.ReadLine()
If A = 1 Then
Console.WriteLine("GOOD,NEXT")
Else : Console.WriteLine("TRY AGAIN")
End If
Dim B As Int16 = Console.ReadLine()
If B = 2 Then
Console.WriteLine("GOOD,NEXT")
End If
Dim C As Int16 = Console.ReadLine()
If C = 3 Then
Console.WriteLine("GOOD,FINISH")
End If
End Sub
End Module
杨硕（网二）- 帖子数 : 2
注册日期 : 08-03-21
您在这个论坛的权限：
您不能在这个论坛回复主题