[Dúvida] Algoritmo para Automatizar Atendimento na Cafeteria

algoritmo "SimuladorCafeteria"

var
    qtd_itens, i: inteiro
    nome: caractere
    preco, total, total_com_desconto: real
    cadastrado: caractere

inicio
    escreva("Quantos itens o cliente vai pedir? ")
    leia(qtd_itens)

    total <- 0

    para i de 1 ate qtd_itens faca
        escreva("Nome do item ", i, ": ")
        leia(nome)

        escreva("Preço do item ", i, ": ")
        leia(preco)

        total <- total + preco
    fimpara

    escreva("O cliente é cadastrado? (s/n): ")
    leia(cadastrado)

    se cadastrado = "s" entao
        total_com_desconto <- total * 0.9
        escreval("Valor total com 10% de desconto: R$ ", total_com_desconto:0:2)
    senao
        escreval("Valor total sem desconto: R$ ", total:0:2)
    fimse

fimalgoritmo