結果

問題 No.2446 完全列
ユーザー tails
提出日時 2023-08-25 23:22:34
言語 cLay
(20241019-1)
結果
AC  
実行時間 2 ms / 2,000 ms
コード長 550 bytes
コンパイル時間 4,160 ms
コンパイル使用メモリ 179,152 KB
実行使用メモリ 5,248 KB
最終ジャッジ日時 2024-12-24 14:23:28
合計ジャッジ時間 5,435 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 30
権限があれば一括ダウンロードができます

ソースコード

diff # 

ll f(Matrix<Mint>a){
	ll y=0,x=0;
	while(y<a.r&&x<a.c){
		ll u=y;
		while(a[u][x]==0){
			++u;
			if(u==a.r){
				u=y;
				++x;
				if(x==a.c){
					return a.r-y;
				}
			}
		}
		if(u!=y){
			rep(i,a.c){
				swap(a[y][i],a[u][i]);
			}
		}
		rep(j,y+1,a.r){
			rep(i,x+1,a.c){
				a[j][i]-=a[j][x]/a[y][x]*a[y][i];
			}
		}
		y+=1;
		x+=1;
	}
	return a.r-y;
}

{
	ll@l,@m,@n;
	Matrix<Mint>a(l,m),b(m,n),c;
	rd(a(l,m),b(m,n));
	c=a*b;
	rep(i,l)rep(j,n)if(c[i][j]){
		wt("No");
		exit(0);
	}
	if(f(a)+f(b)!=l){
		wt("No");
		exit(0);
	}
	wt("Yes");
}
0