Submission #110059


Source Code Expand

Module Module1
 
    Sub Main()
 
        Dim M1$() = Console.ReadLine.Split
        Dim m% = M1$(0)
        Dim vv% = 0
 
	If m < 100 Then
	    Console.WriteLine("00")
        ElseIf m >= 100 & m <= 5000 Then
            vv = m / 100
	    If vv < 10 Then
		Console.WriteLine("0" + vv)
	    Else
 	        Console.WriteLine(vv)
	    End If
        ElseIf m >= 6000 & m <= 30000 Then
            vv = m / 1000 + 50
 	    Console.WriteLine(vv)
        ElseIf m >= 35000 & m <= 70000 Then
            vv = (m / 1000 - 30) / 5 + 80
	    Console.WriteLine(vv)
        ElseIf m > 70000 Then
 	    Console.WriteLine("89")
        End If
     End Sub
End Module

Submission Info

Submission Time
Task B - 視程の通報
User cls0001011
Language C++ (G++ 4.6.4)
Score 0
Code Size 680 Byte
Status CE

Compile Error

./Main.cpp:1:1: error: ‘Module’ does not name a type