Checking all possible solutions for this riddle, finally receiving:
XX: 27 , YYY: 594 , ZZZZZ: 16038
x<-0:9
for(i in x){
for(j in x){
if(i!=j){
tmp<-(i*10+j)*1:82
tmph<-tmp%/%100
tmpz<-tmp%/%10-10*tmph
tmpe<-tmp%/%1-100*tmph-10*tmpz
tmpyyy<-tmp[which(!is.element(tmph,c(i,j)) & !is.element(tmpz,c(i,j)) & !is.element(tmpe,c(i,j)) & tmph!=tmpz & tmph!=tmpe &tmpe!=tmpz & tmp>99 & tmp<1000)]
tmp<-(i*10+j)*tmpyyy
tmp2zt<-tmp%/%10000
tmp2t<-tmp%/%1000-10*tmp2zt
tmp2h<-tmp%/%100-10*tmp2t-100*tmp2zt
tmp2z<-tmp%/%10-10*tmp2h-100*tmp2t-1000*tmp2zt
tmp2e<-tmp%/%1-1000*tmp2t-10000*tmp2zt-100*tmp2h-10*tmp2z
tmpzzzzz<-tmp[which(!is.element(tmp2zt,c(i,j)) &!is.element(tmp2t,c(i,j)) & !is.element(tmp2h,c(i,j)) & !is.element(tmp2z,c(i,j)) & !is.element(tmp2e,c(i,j)) & tmp2h!=tmp2z & tmp2h!=tmp2e &tmp2e!=tmp2z & tmp2e!=tmp2t &tmp2e!=tmp2zt &tmp2t!=tmp2z&tmp2zt!=tmp2z &tmp2h!=tmp2t &tmp2h!=tmp2zt &tmp2t!=tmp2zt & tmp>9999 & tmp<100000)]
if(length(tmpyyy)>0 & length(tmpzzzzz)>0){
for(y in tmpyyy){
tmph<-y%/%100
tmpz<-y%/%10-10*tmph
tmpe<-y%/%1-100*tmph-10*tmpz
tmp2zt<-tmpzzzzz%/%10000
tmp2t<-tmpzzzzz%/%1000-10*tmp2zt
tmp2h<-tmpzzzzz%/%100-10*tmp2t-100*tmp2zt
tmp2z<-tmpzzzzz%/%10-10*tmp2h-100*tmp2t-1000*tmp2zt
tmp2e<-tmpzzzzz%/%1-1000*tmp2t-10000*tmp2zt-100*tmp2h-10*tmp2z
tmpres<-tmpzzzzz[which(!is.element(tmp2zt,c(tmph,tmpz,tmpe))& !is.element(tmp2t,c(tmph,tmpz,tmpe)) & !is.element(tmp2h,c(tmph,tmpz,tmpe))&!is.element(tmp2z,c(tmph,tmpz,tmpe)) & !is.element(tmp2e,c(tmph,tmpz,tmpe))& ((i*10+j)*y==tmpzzzzz))]
if(length(tmpres)>0){
cat(paste("XX:",(i*10+j), ", YYY:",y, ", ZZZZZ:",tmpres))
}
}
}
}
}
}