ОТДЕЛ Задание+; ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём ИЗ "...\Отделы\Обмен\";
ПЕР число, сум_неч: ЦЕЛ;
УКАЗ сум_неч := 0; ПОВТОРЯТЬ число := Приём.Число(); Вывод.Цепь(" "); ЕСЛИ НЕ ЧЕТ(число) ТО УВЕЛИЧИТЬ(сум_неч, число) КОН ДО число = 0; Вывод.ЧЦел("^%d", сум_неч, 0, 0, 0)
КОН Задание.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
