結果
問題 |
No.26 シャッフルゲーム
|
ユーザー |
![]() |
提出日時 | 2019-06-14 18:56:05 |
言語 | Fortran (gFortran 14.2.0) |
結果 |
WA
|
実行時間 | - |
コード長 | 222 bytes |
コンパイル時間 | 1,911 ms |
コンパイル使用メモリ | 31,744 KB |
実行使用メモリ | 5,248 KB |
最終ジャッジ日時 | 2024-11-08 05:48:42 |
合計ジャッジ時間 | 2,583 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge4 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 6 WA * 4 |
ソースコード
implicit none integer(8) a,b,i integer(8),allocatable :: x(:,:) read(*,*) a read(*,*) b allocate (x(1:b,1:2)) do i=1,b read(*,*) x(i,1),x(i,2) if (x(i,1)==a) then a=x(i,2) end if end do write(*,*) a end