Olá pessoal, sou novo nisso de programar e estava acompanhando o conteúdo de Portugol de um curso que comprei e durante um exercício eu pensei em implementar algo, mas não faço ideia de como fazer isso. O exercício em questão é sobre o troco de certa mercadoria e quando sai o resultado aparece escrito "reais", ai eu fiquei pensando "E se o valor for 1 real? como eu coloco esse 'reais' no singular?", se alguém puder me ensinar uma condição para fazer isso eu agradeço
algoritmo "Troco"
var
preco, dinheiro, troco, resto : real
quantidade : inteiro
inicio
escreva("Digite o preço unitário: ")
leia(preco)
escreva("Quantidade comprada: ")
leia(quantidade)
escreva("Dinheiro recebido: ")
leia(dinheiro)
se dinheiro >= (preco * quantidade) entao
troco <- dinheiro - (preco * quantidade)
escreval("Troco = ", troco:4:2)
senao
resto <- (preco * quantidade) - dinheiro
escreval("Dinheiro insuficiente. Faltam ", resto:4:2, " Reais")
fimse
fimalgoritmo