Ответы 1

  • ОТДЕЛ Задание+;ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;ПЕР  ч, y: ЦЕЛ;УКАЗ  ч := Приём.Число();  y := (ч ДЕЛИТЬ 100 ОСТАТОК 10) * 1000 +         (ч ДЕЛИТЬ 1000) * 100 +         (ч ОСТАТОК 10) * 10 +         (ч ДЕЛИТЬ 10 ОСТАТОК 10);  Вывод.ЧЦел("^%d", y, 0, 0, 0)КОН Задание.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years