funcao espaco (char c): bool
    se c = ' ' ou c = ','
        retorne V
    senao:
        retorne F

funcao vogal (char c): bool
    int i
    string v = "aeiou"
    para i em (0..4):
        se v[i] = c:
            retorne V
    retorne F

funcao razao-cons-vog (string s): real
    int i, vog, esp
    vog <- 0
    esp <- 0
    para i em (0..tamanho(s)):
        se vogal (s[i]):
            vog <- vog + 1
        senao se  espaco(s[i]):
            esp <- esp + 1
    retorne (tamanho(s)-esp-vog) / vog