nobel_literature = [
(1901, "Sully Prudhomme", "França"),
(1902, "Theodor Mommsen", "Alemanha"),
(1903, "Bjørnstjerne Bjørnson", "Noruega"),
(1904, "Frédéric Mistral", "França"),
(1904, "José Echegaray", "Espanha"),
(1905, "Henryk Sienkiewicz", "Polónia"),
(1906, "Giosuè Carducci", "Itália"),
(1907, "Rudyard Kipling", "Reino Unido"),
(1908, "Rudolf Christoph Eucken", "Alemanha"),
(1909, "Selma Lagerlöf", "Suécia"),
(1910, "Paul von Heyse", "Alemanha"),
(1911, "Maurice Maeterlinck", "Bélgica"),
(1912, "Gerhart Hauptmann", "Alemanha"),
(1913, "Rabindranath Tagore", "Índia"),
(1915, "Romain Rolland", "França"),
(1916, "Verner von Heidenstam", "Suécia"),
(1917, "Karl Adolph Gjellerup", "Dinamarca"),
(1917, "Henrik Pontoppidan", "Dinamarca"),
(1919, "Carl Spitteler", "Suíça"),
(1920, "Knut Hamsun", "Noruega"),
(1921, "Anatole France", "França"),
(1922, "Jacinto Benavente", "Espanha"),
(1923, "William Butler Yeats", "Irlanda"),
(1924, "Władysław Reymont", "Polónia"),
(1925, "George Bernard Shaw", "Irlanda"),
(1926, "Grazia Deledda", "Itália"),
(1927, "Henri Bergson", "França"),
(1928, "Sigrid Undset", "Noruega"),
(1929, "Thomas Mann", "Alemanha"),
(1930, "Sinclair Lewis", "EUA"),
(1931, "Erik Axel Karlfeldt", "Suécia"),
(1932, "John Galsworthy", "Reino Unido"),
(1933, "Ivan Bunin", "Rússia"),
(1934, "Luigi Pirandello", "Itália"),
(1936, "Eugene O’Neill", "EUA"),
(1937, "Roger Martin du Gard", "França"),
(1938, "Pearl S. Buck", "EUA"),
(1939, "Frans Eemil Sillanpää", "Finlândia"),
(1944, "Johannes Vilhelm Jensen", "Dinamarca"),
(1945, "Gabriela Mistral", "Chile"),
(1946, "Hermann Hesse", "Suíça"),
(1947, "André Gide", "França"),
(1948, "T. S. Eliot", "Reino Unido / EUA"),
(1949, "William Faulkner", "EUA"),
(1950, "Bertrand Russell", "Reino Unido"),
(1951, "Pär Lagerkvist", "Suécia"),
(1952, "François Mauriac", "França"),
(1953, "Winston Churchill", "Reino Unido"),
(1954, "Ernest Hemingway", "EUA"),
(1955, "Halldór Laxness", "Islândia"),
(1956, "Juan Ramón Jiménez", "Espanha"),
(1957, "Albert Camus", "França"),
(1958, "Boris Pasternak", "URSS"),
(1959, "Salvatore Quasimodo", "Itália"),
(1960, "Saint-John Perse", "França"),
(1961, "Ivo Andrić", "Jugoslávia"),
(1962, "John Steinbeck", "EUA"),
(1963, "Giorgos Seferis", "Grécia"),
(1964, "Jean-Paul Sartre", "França"),
(1965, "Mikhail Sholokhov", "URSS"),
(1966, "Shmuel Yosef Agnon", "Israel"),
(1966, "Nelly Sachs", "Suécia"),
(1967, "Miguel Ángel Asturias", "Guatemala"),
(1968, "Yasunari Kawabata", "Japão"),
(1969, "Samuel Beckett", "Irlanda"),
(1970, "Aleksandr Solzhenitsyn", "URSS"),
(1971, "Pablo Neruda", "Chile"),
(1972, "Heinrich Böll", "Alemanha"),
(1973, "Patrick White", "Austrália"),
(1974, "Eyvind Johnson", "Suécia"),
(1974, "Harry Martinson", "Suécia"),
(1975, "Eugenio Montale", "Itália"),
(1976, "Saul Bellow", "EUA"),
(1977, "Vicente Aleixandre", "Espanha"),
(1978, "Isaac Bashevis Singer", "EUA / Polónia"),
(1979, "Odysseas Elytis", "Grécia"),
(1980, "Czesław Miłosz", "Polónia"),
(1981, "Elias Canetti", "Bulgária / Áustria"),
(1982, "Gabriel García Márquez", "Colômbia"),
(1983, "William Golding", "Reino Unido"),
(1984, "Jaroslav Seifert", "Checoslováquia"),
(1985, "Claude Simon", "França"),
(1986, "Wole Soyinka", "Nigéria"),
(1987, "Joseph Brodsky", "EUA / URSS"),
(1988, "Naguib Mahfouz", "Egito"),
(1989, "Camilo José Cela", "Espanha"),
(1990, "Octavio Paz", "México"),
(1991, "Nadine Gordimer", "África do Sul"),
(1992, "Derek Walcott", "Santa Lúcia"),
(1993, "Toni Morrison", "EUA"),
(1994, "Kenzaburō Ōe", "Japão"),
(1995, "Seamus Heaney", "Irlanda"),
(1996, "Wislawa Szymborska", "Polónia"),
(1997, "Dario Fo", "Itália"),
(1998, "José Saramago", "Portugal"),
(1999, "Günter Grass", "Alemanha"),
(2000, "Gao Xingjian", "China / França"),
(2001, "V. S. Naipaul", "Reino Unido / Trinidad e Tobago"),
(2002, "Imre Kertész", "Hungria"),
(2003, "J. M. Coetzee", "África do Sul"),
(2004, "Elfriede Jelinek", "Áustria"),
(2005, "Harold Pinter", "Reino Unido"),
(2006, "Orhan Pamuk", "Turquia"),
(2007, "Doris Lessing", "Reino Unido"),
(2008, "Jean-Marie Gustave Le Clézio", "França"),
(2009, "Herta Müller", "Alemanha / Roménia"),
(2010, "Mario Vargas Llosa", "Peru / Espanha"),
(2011, "Tomas Tranströmer", "Suécia"),
(2012, "Mo Yan", "China"),
(2013, "Alice Munro", "Canadá"),
(2014, "Patrick Modiano", "França"),
(2015, "Svetlana Alexievich", "Bielorrússia"),
(2016, "Bob Dylan", "EUA"),
(2017, "Kazuo Ishiguro", "Reino Unido / Japão"),
(2018, "Olga Tokarczuk", "Polónia"),
(2019, "Peter Handke", "Áustria"),
(2020, "Louise Glück", "EUA"),
(2021, "Abdulrazak Gurnah", "Tanzânia / Reino Unido"),
(2022, "Annie Ernaux", "França"),
(2023, "Jon Fosse", "Noruega"),
(2024, "Han Kang", "Coreia do Sul"),
(2025, "Mircea Cărtărescu", "Roménia"),
]
from tkinter import *
from collections import defaultdict
premios_por_ano = defaultdict(list)
for ano, nome, pais in nobel_literature:
premios_por_ano[ano].append((nome, pais))
root = Tk()
root.geometry("700x300")
root.resizable(0, 0)
root.config(bg="#103030")
root.title("Prémio Nobel de Literatura")
titulo = Label(
text="Prémio Nobel de Literatura",
font=("Arial", 30, "bold"),
bg="#103030",
fg="#49e3e3"
)
titulo.place(relx=0.18, rely=0.05)
texto_sub1 = Label(
text="Ano:",
font=("Arial", 18, "bold"),
bg="#103030",
fg="#49e3e3"
)
texto_sub1.place(relx=0.2, rely=0.32)
# --- Dropdown de anos ---
anos = sorted(list(set(a for a, _, _ in nobel_literature)))
var = StringVar(value=str(anos[-1])) # valor inicial
def mostrar_vencedor(*args):
ano = int(var.get())
vencedores = premios_por_ano[ano]
texto = "\n".join([f"{n} ({p})" for n, p in vencedores])
resultado_label.config(text=texto)
dropdown = OptionMenu(root, var, *anos)
dropdown.place(relx=0.35, rely=0.31)
dropdown.config(bg="#09A3BA", fg="#FFFFFF", font=("Arial", 28, "bold"))
dropdown["menu"].config(bg="#09A3BA", fg="#FFFFFF",font=("Arial", 15, "bold"))
resultado_label = Label(
text="Selecione um ano",
font=("Arial", 18,"bold"),
bg="#103030",
fg="#FFFFFF",
justify="center"
)
resultado_label.place(relx=0.2, rely=0.7)
var.trace_add("write", mostrar_vencedor)
root.mainloop()
