Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ivanural
09.11.2021 22:57 •
Информатика
Напишите программу. в паскале! дано n — натуральное четырёхзначное. найти новое m, поменяв местами 1-2,3-4. пример: n=1234 —> m=2143.
Показать ответ
Ответ:
сынок16
05.07.2020 17:18
Var n,m:string;
begin
readln(n);
m:=n[2]+n[1]+n[4]+n[3];
writeln(m);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
tolstuhen
16.06.2022 23:39
В среде электронных таблиц построить вычислительные таблицы, с которых можно будет ответить на заданные вопросы задачи 4.91 и 4.98, условия даны ниже. Прислать .xls файлом,...
Арина11841
11.10.2020 15:34
Вычислитель Исполнитель Март21 преобразует число на экране. У исполнителя есть три команды, которым присвоены номера: 1. Прибавить 1 2. Прибавить 2 3. Прибавить 3 Сколько существует...
avangardstroic
03.12.2021 12:47
Выписать программу и расписать названия элементов программы8 класс...
Lolopoknhvkcgc
22.04.2021 22:11
Сколько символов содержит сообщение, записанное с 16-и символьного алфавита, если объём его составил 1/16 мбайта?...
ДианаBerts
19.08.2022 16:48
Алгоритм вычисления значения функции F(n), где n – натуральное число, задан следующими соотношениями: очень с объяснением...
МарианМариан
17.12.2020 16:59
Напишите программу вычисления корней квадратного уравнения A,B,C вводятся пользователем....
papa42
26.12.2020 22:42
Пропускная канала измеряется в битах в секунду (бит/с). 1 Гбит/с=2Мбит/с=Мбит/с...
peindragneel11
30.01.2020 19:24
Решите задания на PHYTON...
YeGoR17
01.03.2020 09:45
За яким алгоритмом у середовищі Скретч створюють складні проекти...
olena4519
20.06.2022 01:28
Как называются эти графики? ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(n);
m:=n[2]+n[1]+n[4]+n[3];
writeln(m);
end.