結果

問題 No.428 小数から逃げる夢
コンテスト
ユーザー tatt61880
提出日時 2021-03-30 02:02:29
言語 Kuin
(KuinC++ v.2021.9.17)
結果
AC  
実行時間 2 ms / 1,000 ms
コード長 760 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 2,198 ms
コンパイル使用メモリ 146,932 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-09-16 12:18:17
合計ジャッジ時間 4,874 ms
ジャッジサーバーID
（参考情報） 		judge6 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 100
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

func main()
	var s: []char :: "000001234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991"
	var a: []int :: #[^s]int
	for i(0, ^s - 1)
		do a[i] :: s[i] $ int - '0' $ int
	end for
	var n: int :: cui@inputInt()
	var b: []int :: #[^s]int
	for i(^s - 1, 3, -1)
		do a[i] :* n
		for j(0, 2)
			do b[i - j] :+ a[i] % 10
			if(b[i - j] >= 10)
				do b[i - j] :- 10
				do b[i - j - 1] :+ 1
			end if
			do a[i] :/ 10
		end for
	end for
	for i(0, ^s - 1)
		do s[i] :: '0'.offset(b[i])
	end for
	
	if(s[3] = '0')
		do cui@print("\{s[4]}.\{s.sub(5, -1)}\n")
	else
		do cui@print("\{s[3]}\{s[4]}.\{s.sub(5, -1)}\n")
	end if
end func
0