Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Kejiro
04.07.2022 15:21 •
Информатика
:составить программу которая из данного четырехзначного числа получает новое четырехзначное число поменяв цифры. первую с последней и вторую с третьей. pascal
Ответ:
vladislavtanasienko1
09.10.2020 15:05
begin
var n1 := ReadlnInteger();
var s := n1.ToString;
var n2 := s[::-1].ToInteger;
Print(n2)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Farxadkishi
23.09.2020 03:04
Число 20192019 записали в двоичной системе счисления, затем поменяли нули на единицы, а единицы на нули и перевели обратно в десятичную систему. что получили? в качестве...
daanya666
05.04.2023 10:11
Программирования линейных алгоритмов урок 2 определи значения радиуса круга если площадь ровна 78.5 r**2=s/ pi 4536...
omar28
07.12.2020 11:06
Каковы будут результаты в следующих программ...
gek45
01.04.2020 03:35
Информатика онлайн мектеп 5 класс тема Движение робота по линии...
Вольфыч228
11.02.2022 14:50
Напишите сообщение про вторую великую отечественнуювойну...
BotanikAziz
11.02.2022 14:50
Что такое оглагольные существительные подскажите...
Bonyashechka
11.02.2022 14:50
Что обозначает величина g = 9.8 н/кг (н - ньютоны)...
EminRoth
11.02.2022 14:50
Надо найти сочинение по рассказу в дурном обществе тема: маруся и соня: два детства...
Мишутка890
11.02.2022 14:50
На трёх полках склада стоит 800 банок консервов, причём на первой полке 287 банок, а на второй-256 банок. сколько банок консервов стоит на третьей полке?...
hdhdhdhsaiq
11.02.2022 14:50
Почему православие не принесло улучшения условий жизни удмуртов,бессермян и татаров?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var n1 := ReadlnInteger();
var s := n1.ToString;
var n2 := s[::-1].ToInteger;
Print(n2)
end.