結果

問題 No.2174 3 O'clock Easy
ユーザー ID 21712
提出日時 2025-02-11 02:44:30
言語 Standard ML
(MLton 20210117)
結果
AC  
実行時間 1 ms / 2,000 ms
コード長 396 bytes
コンパイル時間 4,234 ms
コンパイル使用メモリ 688,508 KB
実行使用メモリ 6,824 KB
最終ジャッジ日時 2025-02-11 02:44:35
合計ジャッジ時間 4,992 ms
ジャッジサーバーID
(参考情報)
judge1 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 3
other AC * 9
権限があれば一括ダウンロードができます

ソースコード

diff #

val n = valOf (TextIO.scanStream (LargeInt.scan StringCvt.DEC) TextIO.stdIn);

val k = n div 3;

val s1 = k * (k + 1) div 2;
val s2 = s1 * (2 * k + 1) div 3;
val s3 = s1 * s1;

val a1 = 3*s1-2*k + (if 3*(k+1)-2 <= n then 3*(k+1)-2 else 0);
val a2 = 9*s2-6*s1+k + (if 3*(k+1)-1 <= n then (3*(k+1)-1)*(3*(k+1)-1) else 0);
val a3 = 27*s3;

val ans = a1+a2+a3;

print (LargeInt.toString ans ^ "\n");
0