// Autor: Prof. Tiago Eugenio de Melo // Data: 25.11.2010 // Contato: tiagodemelo@gmail.com algoritmo "LocadoraDVD" var cliente: vetor[1..5] de caracter quant: vetor[1..5] de inteiro i: inteiro inicio para i de 1 ate 5 faca escreval("Digite o nome do cliente e a quantidade de DVDs alugados.") leia(cliente[i]) leia(quant[i]) fimpara para i de 1 ate 5 faca se (quant[i]>=10) entao escreval("O cliente ", cliente[i], " tem direito a ", quant[i]\10, " DVD(s).") fimse fimpara fimalgoritmo