Visualg Caixa Eletronico

Sou novo na área de TI! E preciso de uma ajuda do pessoal mais experiente.

Quero fazer um Caixa Eletrônico que saque somente notas de 50 e 20. Vale ressaltar que ele dá preferencia às notas de 50.

Eu não consigo fazer de jeito nenhum.

O codigo abaixo foi até onde consegui.

Se alguem poder me mandar algum codigo novo eu aceito. Ou até msm um otimizar esse abaixo, tmb aceito.

Lembrando, ele só pode sacar notas de 50 e 20. Dar prioridade as notas de 50.

Minha dificuldade é com certos valores, por exemplo, R$160,00.

Não consigo fazer com que retire 2 notas de 50 e 3 notas de 20.

Por favor me ajudem.

Algoritmo "semnome"
var
saqueUsuario,nota50,nota20:inteiro
sacarValor50,sacarValor20:inteiro

Funcao sacarValor50 : inteiro
var
N50:inteiro
inicio

N50 <- 5

enquanto ((saqueUsuario >= 50) e (N50 > 0)) faca
saqueUsuario <- saqueUsuario - 50
N50 <- N50 - 1
fimenquanto

retorne N50

fimFuncao

Funcao sacarValor20 : inteiro
var
N20:inteiro
inicio

N20 <- 10

enquanto ((saqueUsuario >= 20) e (N20 > 0)) faca
saqueUsuario <- saqueUsuario - 20
N20 <- N20 - 1
fimenquanto

retorne N20

fimFuncao

inicio

leia (saqueUsuario)

nota50 <- sacarValor50()
nota20 <- sacarValor20()

fimalgoritmo