Submission #2699358
Source Code Expand
program main implicit none integer i character(50) O, E read(*, *) O read(*, *) E do i = 1, len_trim(E)-1 write(*, '(a1)', advance = 'No') O(i:i) write(*, '(a1)', advance = 'No') E(i:i) end do if(len_trim(O)-len_trim(E) == 0) then write(*, '(a1)', advance = 'No') O(len_trim(E):len_trim(E)) write(*, '(a1)') E(len_trim(E):len_trim(E)) else write(*, '(a1)', advance = 'No') O(len_trim(E):len_trim(E)) write(*, '(a1)', advance = 'No') E(len_trim(E):len_trim(E)) write(*, '(a1)') O(len_trim(E)+1:len_trim(E)+1) end if end program main
Submission Info
Submission Time | |
---|---|
Task | B - ∵∴∵ |
User | otafuro |
Language | Fortran (gfortran v4.8.4) |
Score | 200 |
Code Size | 573 Byte |
Status | AC |
Exec Time | 3 ms |
Memory | 384 KB |
Judge Result
Set Name | Sample | All | ||||
---|---|---|---|---|---|---|
Score / Max Score | 0 / 0 | 200 / 200 | ||||
Status |
|
|
Set Name | Test Cases |
---|---|
Sample | 0_000.txt, 0_001.txt |
All | 0_000.txt, 0_001.txt, rnd0.txt, rnd1.txt, rnd2.txt, rnd3.txt, short1.txt, short2.txt, short3.txt, wf.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
0_000.txt | AC | 3 ms | 384 KB |
0_001.txt | AC | 1 ms | 256 KB |
rnd0.txt | AC | 1 ms | 256 KB |
rnd1.txt | AC | 1 ms | 256 KB |
rnd2.txt | AC | 1 ms | 256 KB |
rnd3.txt | AC | 1 ms | 256 KB |
short1.txt | AC | 1 ms | 256 KB |
short2.txt | AC | 1 ms | 256 KB |
short3.txt | AC | 1 ms | 256 KB |
wf.txt | AC | 1 ms | 256 KB |