Цифра числа

алг Цифра числа
нач
цел число
число := 12576
цел таб цифры_числа[0:5]
цел индекс
индекс := 5
цел цифра
нц 5 раз
цифра := mod(число,10)
число := div(число,10)
цифры_числа[индекс] := цифра
индекс := индекс - 1
кц
индекс := 1
нц 5 раз
вывод "цифра ",индекс," ",цифры_числа[индекс],нс
индекс := индекс + 1
кц

кон


Рецензии

Завершается прием произведений на конкурс «Георгиевская лента» за 2021-2025 год. Рукописи принимаются до 24 февраля, итоги будут подведены ко Дню Великой Победы, объявление победителей состоится 7 мая в ЦДЛ. Информация о конкурсе – на сайте georglenta.ru Представить произведения на конкурс →