結果

問題 No.2374 ASKT Subsequences
コンテスト
ユーザー ks2m
提出日時 2023-07-07 21:51:47
言語 Java
(openjdk 26.0.2.1 + ACL)
コンパイル:
javac -J-Duser.language=en -encoding UTF8 -cp /opt/aclib/ac_library.jar _filename_
実行:
java -ea -Xmx700m -Xss256M -DONLINE_JUDGE=true -cp .:/opt/aclib/ac_library.jar _class_
結果
AC  
実行時間 589 ms / 2,000 ms
+ 13µs
コード長 816 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 1,435 ms
コンパイル使用メモリ 84,632 KB
実行使用メモリ 261,768 KB
最終ジャッジ日時 2026-08-22 05:30:32
合計ジャッジ時間 17,267 ms
ジャッジサーバーID
（参考情報） 		judge2_0 / judge1_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 28
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

import java.util.Scanner;

public class Main {
	public static void main(String[] args) throws Exception {
		Scanner sc = new Scanner(System.in);
		int n = sc.nextInt();
		int[] a = new int[n];
		for (int i = 0; i < n; i++) {
			a[i] = sc.nextInt();
		}
		sc.close();

		long[][][] dp = new long[2000][2001][4];
		for (int i = 0; i < n; i++) {
			for (int k = 1; k < 2000; k++) {
				dp[k][a[i]][0]++;
				if (a[i] - k - 10 > 0) {
					dp[k][a[i]][1] += dp[k][a[i] - k - 10][0];
				}
				if (a[i] + k <= 2000) {
					dp[k][a[i]][2] += dp[k][a[i] + k][1];
				}
				if (a[i] - k - 1 > 0) {
					dp[k][a[i]][3] += dp[k][a[i] - k - 1][2];
				}
			}
		}
		long ans = 0;
		for (int i = 0; i < dp.length; i++) {
			for (int j = 0; j < dp[i].length; j++) {
				ans += dp[i][j][3];
			}
		}
		System.out.println(ans);
	}
}
0