結果

問題 No.750 Frac #1
ユーザー tatt61880
提出日時 2020-03-27 01:03:29
言語 Kuin(beta)
(v.2019.9.17 on Wine)
結果
AC   .
実行時間 512 ms
コード長 764 Byte
コンパイル時間 367 ms
使用メモリ 51,740 KB
最終ジャッジ日時 2020-03-27 01:03:51

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
sample_01 AC 494 ms
51,724 KB
sample_02 AC 511 ms
51,664 KB
sample_03 AC 507 ms
49,616 KB
test_01 AC 454 ms
49,548 KB
test_02 AC 470 ms
49,640 KB
test_03 AC 490 ms
49,640 KB
test_04 AC 497 ms
49,560 KB
test_05 AC 493 ms
49,608 KB
test_06 AC 499 ms
49,556 KB
test_07 AC 486 ms
51,740 KB
test_08 AC 505 ms
51,608 KB
test_09 AC 481 ms
49,676 KB
test_10 AC 484 ms
51,604 KB
test_11 AC 495 ms
51,632 KB
test_12 AC 502 ms
49,676 KB
test_13 AC 503 ms
51,716 KB
test_14 AC 512 ms
49,564 KB
test_15 AC 509 ms
51,612 KB
test_16 AC 489 ms
51,628 KB
test_17 AC 500 ms
51,612 KB
test_18 AC 506 ms
49,736 KB
test_19 AC 486 ms
51,712 KB
test_20 AC 496 ms
49,636 KB
test_21 AC 490 ms
49,548 KB
test_22 AC 493 ms
49,560 KB
test_23 AC 501 ms
51,600 KB
test_24 AC 476 ms
49,556 KB
test_25 AC 497 ms
51,620 KB
test_26 AC 493 ms
51,684 KB
test_27 AC 486 ms
49,544 KB
test_28 AC 481 ms
51,604 KB
test_29 AC 487 ms
51,664 KB
test_30 AC 489 ms
51,720 KB
テストケース一括ダウンロード

ソースコード

diff #
func main()
	class Frac()
		+var a: int
		+var b: int
		var str: []char
		+func init(a: int, b: int): Frac
			do me.a :: (b > 0) ?(a, -a)
			do me.b :: (b > 0) ?(b, -b)
			do me.str :: "\{a} \{b}"
			ret me
		end func
		+*func cmp(t: Frac): int
			if(me.a * t.b > t.a * me.b)
				ret 1
			elif(me.a * t.b < t.a * me.b)
				ret - 1
			end if
			ret 0
		end func
		+*func toStr(): []char
			ret me.str
		end func
	end class
	
	var n: int :: cui@input().toInt(&)
	var fracs: []Frac :: #[n]Frac
	for i(0, n - 1)
		var ss: [][]char :: cui@input().split(" ")
		var a: int :: ss[0].toInt(&)
		var b: int :: ss[1].toInt(&)
		do fracs[i] :: (#Frac).init(a, b)
	end for
	do fracs.sort()
	do fracs.reverse()
	for i(0, n - 1)
		do cui@print("\{fracs[i]}\n")
	end for
end func
0