Submission #40345582

Source Code Expand

Copy
Imports System
Module A
    Sub Main()
        Dim D As Integer = Console.ReadLine()
        Console.Write(D / 100)
    End Sub
End Module
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
Imports System
Module A
    Sub Main()

        Dim D As Integer = Console.ReadLine()
        Console.Write(D / 100)

    End Sub
End Module

Submission Info

Submission Time
Task A - Water Pressure
User WorldEndHeroes
Language Visual Basic (.NET Core 3.1.101)
Score 100
Code Size 148 Byte
Status AC
Exec Time 82 ms
Memory 28396 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 3
AC × 11
Set Name Test Cases
Sample sample_00.txt, sample_01.txt, sample_02.txt
All case_00.txt, case_01.txt, case_02.txt, case_03.txt, case_04.txt, case_05.txt, case_06.txt, case_07.txt, sample_00.txt, sample_01.txt, sample_02.txt
Case Name Status Exec Time Memory
case_00.txt AC 82 ms 28396 KB
case_01.txt AC 79 ms 28000 KB
case_02.txt AC 77 ms 27848 KB
case_03.txt AC 82 ms 28148 KB
case_04.txt AC 79 ms 27932 KB
case_05.txt AC 78 ms 27992 KB
case_06.txt AC 79 ms 28252 KB
case_07.txt AC 79 ms 28064 KB
sample_00.txt AC 75 ms 28252 KB
sample_01.txt AC 79 ms 28092 KB
sample_02.txt AC 79 ms 28104 KB

2025-04-05 (Sat)
13:36:19 +00:00