Algoritmo para informar se número é composto ou primo, caso composto, realizar a decomposição em números primos

Bom dia, preciso realizar uma atividade em portugol, aonde é feito a leitura de um número, identificando se o mesmo é primo, caso não seja primo, deve ser feita a decomposição em fatores primos, o algoritmo para de rodar quando for informado um número negativo. porém como posso realizar um laço ou condicional para fazer a fatoração ? Ainda não encontrei a forma adequada, se puderem ajudar por favor

Segue o meu código:

programa

{

funcao inicio()

{

inteiro n = 0, cont = 0

inteiro d = 1

inteiro fat

inteiro div = 0

inteiro comp = 0

escreva("Informando se o número é composto ou primo e sua decomposição \n")

enquanto(n >= 0){

escreva("Informe um número natural: ")

leia(n)

se(n == 1){

escreva("O número não é primo nem composto! \n")

}

se(n % d == 0){

d = 2

}

se(n == 0){

escreva("O número não é primo nem composto! \n")

}

senao

se(n % d == 0 e n % n == 0 e n != 2){

escreva("O número " ,n, " é composto! ")

comp = n

}senao

se(n % n == 0 e n > 0 e n != 0 e n != 1){

escreva("O número " ,n, " é primo! \n")

}

}

}

}