Найти все четырехзначные числа, которые равны произведению своих цифр.

Спасибо за помощь, но это надо написать как блоксхему и программу, а как написать правильно я не знаю

Один Десять сто и Тысяча