' NOTA: si raccomanda di usare questo template anche se non lo si capisce completamente.

Imports System.IO
Module gossip
    Public Tokens As String() = New String() { }
    Public CurrentToken As Integer = 0

    Public Function NextString() as String
        If CurrentToken + 1 >= Tokens.Length Then
            Dim input as String = Trim(Console.ReadLine)
            While Len(input) = 0
                input = Trim(Console.ReadLine)
            End While
            Tokens = input.Split(" ")
            CurrentToken = 0
        Else
            CurrentToken = CurrentToken + 1
        End If
        Return Tokens(CurrentToken)
    End Function

    Public Sub Main()
        Dim SR As StreamReader = Nothing, SW As StreamWriter = Nothing

        ' decommenta le due righe seguenti se vuoi leggere/scrivere da file
        ' SR = New StreamReader("input.txt") : Console.SetIn(SR)
        ' SW = New StreamWriter("output.txt", append:=False) : Console.SetOut(SW)

        Dim T As Integer = NextString()
        For test As Integer = 1 To T
            Dim N As Integer = NextString()
            Dim M As Integer = NextString()
            Dim K As Integer = NextString()

            Dim G(K-1) As Integer
            For i As Integer = 0 To K-1
                G(i) = NextString()
            Next i

            Dim A(M-1) As Integer
            Dim B(M-1) As Integer
            For i As Integer = 0 To M-1
                A(i) = NextString()
                B(i) = NextString()
            Next i

            Dim ris As Long = 0


            ' INSERISCI IL TUO CODICE QUI


            Console.Write("Case #" & test & ": ")
            Console.WriteLine(ris)
        Next test

        If SR IsNot Nothing Then SR.Close()
        If SW IsNot Nothing Then SW.Close()
    End Sub
End Module