結果

問題 No.167 N^M mod 10
ユーザー ldsyb
提出日時 2016-05-24 22:27:05
言語 Scheme
(Gauche-0.9.15)
結果
AC  
実行時間 29 ms / 1,000 ms
コード長 147 bytes
コンパイル時間 55 ms
コンパイル使用メモリ 6,816 KB
実行使用メモリ 16,768 KB
最終ジャッジ日時 2024-09-22 01:31:29
合計ジャッジ時間 1,841 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 2
other AC * 27
権限があれば一括ダウンロードができます

ソースコード

diff # 

(define n (read))
(define m (read))
(display
	(if (= m 0)
		1
		(modulo (expt (modulo n 10) (if (= (modulo m 4) 0) 4 (modulo m 4))) 10)))
(newline)
0