diana125sirena62rus
30.06.2022 12:07

Дано 4-значное число abcd. вычислить число y=badc

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
nimnogopozitiva
08.09.2020 08:58
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;

ПЕР
  ч, y: ЦЕЛ;

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

КОН Задание.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота