Tutorial Programacao Pascal Numero De Armstrong

Tutorial ensinando a criar um programa em Pascal que descobre se um numero segue a lógica de Armstrong ou não ?