Бинго: ряд собран?

Вы играете в бинго на поле 3x3. Клетки отмечаются по мере выпадения чисел, и побеждает тот, кто первым соберёт полностью отмеченный ряд, столбец или диагональ.

Напишите функцию has_bingo(marked), которая принимает список из 9 целых чисел (0 или 1) — состояние поля 3x3, развёрнутое построчно (индексы 0..8). Функция возвращает True, если есть хотя бы один полностью отмеченный (все три клетки равны 1) ряд, столбец или одна из двух диагоналей; иначе False.

Пример:

has_bingo([1, 1, 1, 0, 0, 0, 0, 0, 0]) -> True   # верхний ряд
has_bingo([1, 1, 0, 1, 0, 1, 0, 1, 0]) -> False