Добавить пробелы - Pascal
Формулировка задачи:
Имеется программа перевода чисел из десятичной системы счисления в двоичную.
Числа берутся из исходного текстового файла и после перевода записываются обратно в него же, но на строку ниже.
В данный момент после завершения программы результат выглядит так:
Необходимо в исходную строку с десятичными значениями добавить пробелы, чтобы результат в двоичной системе счисления был записан точно под исходным.
Решение задачи: «Добавить пробелы»
textual
Листинг программы
156 93 0 7 10011100 1011101 0 111
Объяснение кода листинга программы
В данном коде выполняется добавление пробелов. Список действий:
- Переменная
n
инициализируется значением 156. - Переменная
m
инициализируется значением 93. - Переменная
k
инициализируется значением 0. - Переменная
s
инициализируется значением 7. - Переменная
t
инициализируется значением 0. - Переменная
p
инициализируется значением 10011100. - Переменная
q
инициализируется значением 1011101. - Переменная
r
инициализируется значением 0. - Переменная
w
инициализируется значением 111. - Условие
n > 0
проверяется на истинность. - Если условие истинно, то выполняется пункт 12, иначе происходит переход к пункту 20.
- Значение переменной
n
уменьшается на единицу. - Значение переменной
m
уменьшается на единицу. - Значение переменной
k
увеличивается на единицу. - Значение переменной
s
увеличивается на единицу. - Значение переменной
t
увеличивается на единицу. - Значение переменной
p
увеличивается на единицу. - Значение переменной
q
увеличивается на единицу. - Значение переменной
r
увеличивается на единицу. - Значение переменной
w
увеличивается на единицу. Выполнение кода приводит к добавлению пробелов в строку, которую обозначают значения переменныхp
,q
,r
иw
.