Algoritimo

1º--------------------------------------------------------------------------------------------------- procedimento imprimeDataExtenso(inteiro dia, inteiro mes, inteiro ano) se (mes = 1) escreva(dia, + " de Janeiro de " + ano) senao se (mes = 2) escreva(dia, + " de Fevereiro de " + ano) senao se (mes = 3) escreva(dia, + " de Março de " + ano) senao se (mes = 4) escreva(dia, + " de Abril de " + ano) senao se (mes = 5) escreva(dia, + " de Maio de " + ano) senao se (mes = 6) escreva(dia, + " de Junho de " + ano) senao se (mes = 7) escreva(dia, + " de Julho de " + ano) senao se (mes = 8) escreva(dia, + " de Agosto de " + ano) senao se (mes = 9) escreva(dia, + " de Setembro de " + ano) senao se (mes = 10) escreva(dia, + " de Outubro de " + ano)o senao se (mes = 11) escreva(dia, + " de Novembro de " + ano) senao (mes = 12) escreva(dia, + " de Dezembro de " + ano) fim se

fim procedimento

Algoritomo dataExtenso() inteiro dia, mes, ano

inicio escreva("Entre com o Dia") leia dia escreva("Entre com o Mes") leia mes escreva("Entre com o Ano") leia ano

imprimeDataExtenso(dia, mes, ano) fim ##################################################################
2º--------------------------------------------------------------------------------------------------------------------------------
procedimento pegaCategoria(inteiro idade) se(idade >=5 e idade =8 e idade =11 e idade =14 e idade =18) escreva "Adulto" fim se
Algoritimo Categoria inteiro idade

inicio escreva("Entre com sua Idade") leia idade

pegaCategoria(idade) fim ##################################################################
3º--------------------------------------------------------------------------------------------------------------------------------

procedimento Baskara

Como já deve ter percebido, o exemplo tem DUAS raízes.

- E é sempre duas raízes?

Sim, uma função do segundo grau