Attribute VB_Name = "Module1"

Public Function media2(A, B)
    media2 = (A + B) / 2
End Function

Public Function areacirc(raio)
    areacirc = 3.141593 * raio ^ 2
End Function

Public Function ivacalc(preco, taxa)
    ivacalc = (preco * taxa) / (100 + taxa)
End Function

Public Function my_xor(A, B)
    my_xor = (A <> B)
End Function

Public Function maior(A1, A2)
    maior = (A1 > A2)
End Function

Public Function somos(aluno1, aluno2)
    somos = "Nós somos o(a) " & aluno1 & " e o(a) " & aluno2
End Function