racket

#lang racket

(require db)
(define SQLite
  (sqlite3-connect #:database "C:/Users/Icaro/Documents/faculdade/prolog/trabalho1/db/worldcup.db")
)

(define teams (query-list SQLite "select name from teams"))


(define teams-list (map (lambda (team)
                                    (display (~a team "\n"))) teams))

(for ([ i teams])
(display (~a "o valor de: " i "\n"))
)