Из 10ой в 2ую

[-000-]

Пожалуйста помогите, как мне на языке ПАСКАЛЬ написать программу которая будет переводить десятичные числа в двоичные.