結果

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

ソースコード

diff #

val n = valOf (TextIO.scanStream (Int64.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 (Int64.toString ans ^ "\n");
0