programa
{
	inclua biblioteca Matematica --> mat
	funcao inicio()
	{
		cadeia scodigo[90], snome[90]
		real  svalor[90], squan[90], cal[90], total, up
		inteiro iprodutos
		escreva("Quantos produtos você deseja comprar? ")
		leia(iprodutos)

		para(inteiro i = 0; i < iprodutos; i++){
		escreva("Codigo do produto: ")
		leia(scodigo[i])
		escreva("Nome do produto: ")
		leia(snome[i])
		escreva("Valor do produto: ")
		leia(svalor[i])
		escreva("Quantidade de produto voce quer comprar: ")
		leia(squan[i])
		limpa()



		para (inteiro contador = 0 ; contador < iprodutos ; contador ++)
			{
				cal[contador] = svalor[contador] * squan[contador]


			}
		}
					total = cal[0]+ cal[1]+ cal[2] + cal[3]
escreva("\n########################################################")
escreva("\n#                      NOTA FISCAL                     #")
escreva("\n#                 RUA DESENVOLVIMENTO, N01             #")
escreva("\n#                 São Gabriel da Palha - ES            #")
escreva("\n########################################################")
escreva("\nCód.    Descrição            Unidade       Preço    Total")
escreva("\n--------------------------------------------------------")
up = mat.arredondar(cal[0], 2)
escreva("\n",scodigo[0],"       ",snome[0],"                 ",squan[0], "      ",
svalor[0], "        R$ " ,up)
up = mat.arredondar(cal[1], 2)
escreva("\n",scodigo[1],"       ",snome[2],"                 ",squan[1], "      ",
svalor[1], "        R$ " ,up)
up = mat.arredondar(cal[2], 2)
escreva("\n",scodigo[2],"       ",snome[2],"                 ",squan[2], "      ",
svalor[2], "        R$ " ,up)
up = mat.arredondar(cal[3], 2)
escreva("\n",scodigo[3],"       ",snome[3],"                 ",squan[3], "      ",
svalor[3], "        R$ " ,up)


escreva("\n\nTotal: R$ ", total)
escreva("\n--------------------------------------------------------")
escreva("\n		AGRADEÇEMOS PELA PREFERENCIA, VOLTE SEMPRE ")
//basico
	}
}