programa
{

	funcao inicio()
	{
	inteiro meses[20], ico =0, menor = 999, maior = 1
	cadeia nome[20], menorTemp ="", maiorTemp=""

	para(inteiro i = 0; i < 3; i++){
		escreva("NOME: ")
		leia(nome[i])
		escreva("MESES: ")
		leia(meses[i])

		se (meses[i] < menor){
			menor = meses[i]
			menorTemp = nome[i]

		}senao se (meses[i] > maior){
			maior = meses[i]
			maiorTemp = nome[i]
			}
		}

limpa()
escreva("O FUNCIONARIO",maiorTemp, " TRABALHA NA EMPRESA " ,maior, " MESES.")
escreva("\nO FUNCIONARIO ",menorTemp, " TRABALHA NA EMPRESA " ,menor, " MESES.")


//basico
	}
}