結果

問題 No.1318 ABCD quadruplets
ユーザー ransewhale
提出日時 2020-12-17 01:01:27
言語 C++17
(gcc 13.3.0 + boost 1.87.0)
結果
AC  
実行時間 639 ms / 2,000 ms
コード長 1,210 bytes
コンパイル時間 847 ms
コンパイル使用メモリ 77,048 KB
最終ジャッジ日時 2025-01-17 02:14:06
ジャッジサーバーID
（参考情報） 		judge2 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 30
権限があれば一括ダウンロードができます

ソースコード

diff # 

#include <stdio.h>
#include <iostream>
#include <vector>
#include <queue>
#include <stack>
#include <algorithm>

using ll = long long int;
const int INF = (1<<30);
const ll INFLL = (1ll<<60);
const ll MOD = (ll)(1e9+7);

#define l_ength size

void mul_mod(ll& a, ll b){
	a *= b;
	a %= MOD;
}

void add_mod(ll& a, ll b){
	a = (a<MOD)?a:(a-MOD);
	b = (b<MOD)?b:(b-MOD);
	a += b;
	a = (a<MOD)?a:(a-MOD);
}

ll ans[161616];

ll f(ll a, ll b, ll c, ll d){
	return ((a*a+b*b+c*c+d*d+(a+b+c+d)*(a+b+c+d))/2);
}

ll calc(ll a, ll b, ll c, ll d){
	ll ret = 24ll;
	if(a==b){
		ret /= 2;
		if(b==c){
			ret /= 3;
			if(c==d){
				ret /= 4;
			}
		}else if(c==d){
			ret /= 2;
		}
	}else if(b==c){
		ret /= 2;
		if(c==d){
			ret /= 3;
		}
	}else if(c==d){
		ret /= 2;
	}
	return ret;
}

int main(void){
	ll n,m,a,b,c,d,i;
	std::cin >> n >> m;
	for(a=0; a<=m; ++a){
		if(f(a,a,a,a)>n){
			break;
		}
		for(b=a; b<=m; ++b){
			if(f(a,b,b,b)>n){
				break;
			}
			for(c=b; c<=m; ++c){
				if(f(a,b,c,c)>n){
					break;
				}
				for(d=c; d<=m; ++d){
					if(f(a,b,c,d)>n){
						break;
					}
					ans[f(a,b,c,d)] += calc(a,b,c,d);
				}
			}
		}
	}
	for(i=0; i<=n; ++i){
		std::cout << ans[i] << std::endl;
	}
	return 0;
}
0