Submission #3050026
Source Code Expand
Option Strict On Module Module1 Sub Main() 'let' Dim tmp() As Long = Array.ConvertAll(Of String, Long) _ (Console.ReadLine().Split(), AddressOf Long.Parse) Dim A As Long = tmp(0) Dim B As Long = tmp(1) 'var' Dim ans() As Long = New Long() {A + B, A - B, A * B} Array.Sort(ans) Dim n As Int32 = UBound(ans) Console.WriteLine(ans(n)) End Sub End Module
Submission Info
Submission Time | |
---|---|
Task | A - Add Sub Mul |
User | ToshiroYanagi |
Language | Visual Basic (Mono 4.0.1) |
Score | 100 |
Code Size | 470 Byte |
Status | AC |
Exec Time | 22 ms |
Memory | 13268 KB |
Judge Result
Set Name | Sample | All | ||||
---|---|---|---|---|---|---|
Score / Max Score | 0 / 0 | 100 / 100 | ||||
Status |
|
|
Set Name | Test Cases |
---|---|
Sample | sample_01.txt, sample_02.txt, sample_03.txt |
All | sample_01.txt, sample_02.txt, sample_03.txt, sample_01.txt, sample_02.txt, sample_03.txt, subtask_1_01.txt, subtask_1_02.txt, subtask_1_03.txt, subtask_1_04.txt, subtask_1_05.txt, subtask_1_06.txt, subtask_1_07.txt, subtask_1_08.txt, subtask_1_09.txt, subtask_1_10.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
sample_01.txt | AC | 22 ms | 13268 KB |
sample_02.txt | AC | 21 ms | 11220 KB |
sample_03.txt | AC | 21 ms | 11220 KB |
subtask_1_01.txt | AC | 22 ms | 13268 KB |
subtask_1_02.txt | AC | 21 ms | 11220 KB |
subtask_1_03.txt | AC | 21 ms | 9172 KB |
subtask_1_04.txt | AC | 21 ms | 11220 KB |
subtask_1_05.txt | AC | 21 ms | 11220 KB |
subtask_1_06.txt | AC | 21 ms | 9172 KB |
subtask_1_07.txt | AC | 21 ms | 11220 KB |
subtask_1_08.txt | AC | 21 ms | 11220 KB |
subtask_1_09.txt | AC | 21 ms | 9172 KB |
subtask_1_10.txt | AC | 21 ms | 9172 KB |