4) Faça um programa para achar todos os números inteiros e positivos entre dois números lidos (N1 e N2), tais que:

) Não terminem em zero;
b) Se o dígito à direita for removido, o número restante seja divisor do número original. (ex: 39 (3 é divisor de 39).
algoritmo “Decomposição”
var
  n,n1,n2,k:inteiro
inicio
  escreva(“Digite início:”)
  leia(n1)
  escreva(“Digite final:”)
  leia(n2)
  n<-n2
  repita
    se ((n mod 10)<>0) entao
      k<- n div 10
        se (k<>0) entao
          se ((n mod k)=0) entao
            escreval(n)
          fimse
        fimse
    fimse
    n<-n+1
  ate (n>n2)
fimalgoritmo