#530427 (cLay) No.1171 Runs in Subsequences

• 問題: No.1171 Runs in Subsequences
• ユーザー: tails
• 提出日時: 2020-08-14 22:13:58
• 言語: cLay (20240714-1)
• 結果: AC
• 実行時間: 17 ms / 2,000 ms
• コード長: 199 bytes
• コンパイル時間: 3,111 ms
• コンパイル使用メモリ: 173,648 KB
• 実行使用メモリ: 5,376 KB
• 最終ジャッジ日時: 2024-07-05 13:53:52
• 合計ジャッジ時間: 3,692 ms
• ジャッジサーバーID （参考情報）: judge1 / judge2

入力	結果	実行時間; 実行使用メモリ
testcase_00	AC	1 ms; 5,248 KB
testcase_01	AC	1 ms; 5,376 KB
testcase_02	AC	1 ms; 5,376 KB
testcase_03	AC	2 ms; 5,376 KB
testcase_04	AC	2 ms; 5,376 KB
testcase_05	AC	2 ms; 5,376 KB
testcase_06	AC	2 ms; 5,376 KB
testcase_07	AC	2 ms; 5,376 KB
testcase_08	AC	2 ms; 5,376 KB
testcase_09	AC	1 ms; 5,376 KB
testcase_10	AC	1 ms; 5,376 KB
testcase_11	AC	1 ms; 5,376 KB
testcase_12	AC	2 ms; 5,376 KB
testcase_13	AC	1 ms; 5,376 KB
testcase_14	AC	1 ms; 5,376 KB
testcase_15	AC	17 ms; 5,376 KB
testcase_16	AC	17 ms; 5,376 KB
testcase_17	AC	17 ms; 5,376 KB
testcase_18	AC	17 ms; 5,376 KB
testcase_19	AC	16 ms; 5,376 KB
testcase_20	AC	16 ms; 5,376 KB
testcase_21	AC	17 ms; 5,376 KB

ソースコード

Mint a[26],b[26];
char c,s[3d5],*p=s;
{
	rd(s);
	for(;c=*p;++p){
		c-=97;
		a[c]+=a[c]+1;
		b[c]+=b[c]+1;
		rep(i,26){
			if(i!=c){
				a[c]+=a[i];
				b[c]+=b[i]+a[i];
			}
		}
	}
	wt(sum(b(26)));
}