помогите зделать программу в паскале

надо зделать программу
которая вычисляет децимальные числа в бинарные
спомощь цикла while или repeath
и
операторов DIV и MOD