結果
| 問題 | 
                            No.697 池の数はいくつか
                             | 
                    
| ユーザー | 
                             brthyyjp
                         | 
                    
| 提出日時 | 2020-11-01 18:01:07 | 
| 言語 | PyPy3  (7.3.15)  | 
                    
| 結果 | 
                             
                                MLE
                                 
                             
                            
                         | 
                    
| 実行時間 | - | 
| コード長 | 1,173 bytes | 
| コンパイル時間 | 306 ms | 
| コンパイル使用メモリ | 82,316 KB | 
| 実行使用メモリ | 397,468 KB | 
| 最終ジャッジ日時 | 2024-11-25 16:36:20 | 
| 合計ジャッジ時間 | 14,344 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge4 / judge3 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 3 | 
| other | AC * 26 MLE * 6 | 
ソースコード
h, w = map(int, input().split())
A = [list(map(int, input().split())) for _ in range(h)]
def Find(x, par):
    if par[x] < 0:
        return x
    else:
        par[x] = Find(par[x], par)
        return par[x]
def Unite(x, y, par, rank):
    x = Find(x, par)
    y = Find(y, par)
    if x != y:
        if rank[x] < rank[y]:
            par[y] += par[x]
            par[x] = y
        else:
            par[x] += par[y]
            par[y] = x
            if rank[x] == rank[y]:
                rank[x] += 1
def Same(x, y, par):
    return Find(x, par) == Find(y, par)
def Size(x, par):
    return -par[Find(x, par)]
par = [-1]*(h*w)
rank = [0]*(h*w)
for i, row in enumerate(A):
    for j, a in enumerate(row):
        v = i*w+j
        if a == 1:
            for di, dj in (-1, 0), (1, 0), (0, -1), (0, 1):
                ni, nj = i+di, j+dj
                if 0 <= ni < h and 0 <= nj < w:
                    if A[ni][nj] == 1:
                        u = ni*w+nj
                        Unite(v, u, par, rank)
S = set()
for i, row in enumerate(A):
    for j, a in enumerate(row):
        v = i*w+j
        if a == 1:
            S.add(Find(v, par))
print(len(S))
            
            
            
        
            
brthyyjp