Регистрация
mivliev38p08iax
04.11.2022 11:08
Информатика
Есть ответ 👍

Синформатикой, первое , , заранее )

118
165
Посмотреть ответы 1

Ответы на вопрос:

Простокнигоманка
Простокнигоманка
4,5(59 оценок)
Var n,y: integer;             a,b,c,d: integer; begin readln(n); a: = n div 1000; b: = n div 100 - a * 10; c: = n div 10 - a * 100 - b * 10; d: = n mod 10; y: = b*1000 + a*100 + d*10 + c; writeln(y); end. пример: 4295 (5290) вывод: 2459 (2509)

Популярно: Информатика