함수형 피타고라스 삼각형 구하기

하스켈

[(a, b, c) | c <- [1..20], a <- [1..c], b <- [a..c], a^2 + b^2 == c^2]

C++ 

ranges

    vector<std::tuple<int,int,int>> v = view::iota(1, 20) >>= [](int c){
        return view::iota(1, c) >>= [=](int b){
            return view::iota(b, c) >>= [=](int a){
                return yield_if(a*a + b*b == c*c, std::make_tuple(a,b,c));
            };
        };
    };