結果

問題 No.369 足し間違い
ユーザー kokoa1046
提出日時 2017-09-03 20:15:17
言語 Scheme
(Gauche-0.9.15)
結果
RE  
実行時間 -
コード長 152 bytes
コンパイル時間 34 ms
コンパイル使用メモリ 6,692 KB
実行使用メモリ 16,384 KB
最終ジャッジ日時 2024-11-06 20:06:15
合計ジャッジ時間 1,017 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample RE * 3
other RE * 5
権限があれば一括ダウンロードができます

ソースコード

diff # 

(define (readn n)  (if (= n 0) '() (cons (read) (readn (- n 1)) ) ))
(define x (read))
(define y (apply + 0 (readn x))
(define z (read))
(print (- z y))
0