#922931 (cLay) No.2517 Right Triangles on Circle

• 問題: No.2517 Right Triangles on Circle
• ユーザー: tails
• 提出日時: 2023-10-27 21:33:29
• 言語: cLay (20240104-1)
• 結果: AC
• 実行時間: 18 ms / 2,000 ms
• コード長: 153 bytes
• コンパイル時間: 5,514 ms
• コンパイル使用メモリ: 208,988 KB
• 実行使用メモリ: 12,952 KB
• 最終ジャッジ日時: 2023-10-27 21:33:37
• 合計ジャッジ時間: 7,026 ms
• ジャッジサーバーID （参考情報）: judge13 / judge12

入力	結果	実行時間; 実行使用メモリ
testcase_00	AC	2 ms; 7,604 KB
testcase_01	AC	2 ms; 7,604 KB
testcase_02	AC	2 ms; 7,604 KB
testcase_03	AC	2 ms; 7,604 KB
testcase_04	AC	2 ms; 7,604 KB
testcase_05	AC	3 ms; 7,604 KB
testcase_06	AC	2 ms; 7,604 KB
testcase_07	AC	2 ms; 7,604 KB
testcase_08	AC	2 ms; 7,604 KB
testcase_09	AC	2 ms; 7,604 KB
testcase_10	AC	3 ms; 7,604 KB
testcase_11	AC	2 ms; 7,604 KB
testcase_12	AC	1 ms; 7,604 KB
testcase_13	AC	11 ms; 10,904 KB
testcase_14	AC	11 ms; 10,904 KB
testcase_15	AC	18 ms; 12,952 KB
testcase_16	AC	16 ms; 12,952 KB
testcase_17	AC	15 ms; 12,524 KB
testcase_18	AC	13 ms; 12,396 KB
testcase_19	AC	11 ms; 10,148 KB
testcase_20	AC	11 ms; 10,164 KB
testcase_21	AC	15 ms; 12,932 KB
testcase_22	AC	6 ms; 8,960 KB
testcase_23	AC	13 ms; 12,296 KB
testcase_24	AC	7 ms; 9,300 KB
testcase_25	AC	6 ms; 8,740 KB
testcase_26	AC	15 ms; 12,584 KB
testcase_27	AC	5 ms; 8,868 KB
testcase_28	AC	4 ms; 8,272 KB
testcase_29	AC	6 ms; 9,216 KB
testcase_30	AC	4 ms; 8,520 KB
testcase_31	AC	13 ms; 12,284 KB

ソースコード

ll@n,@m,@a[n],j=0,z=0;
sortA(n,a);
rep(i,n){
	a[i]*=2;
	if(a[i]>=m){
		while(a[i]-a[j]>m){
			++j;
		}
		if(a[i]-a[j]==m){
			++z;
		}
	}
}
wt(z*(n-2));