Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
nagornayka69
02.08.2022 14:36 •
Информатика
Написать программу, которая удваивает меньшее из двух чисел и увеличивает на два большее из чисел
Показать ответ
Ответ:
kagdhs
23.06.2020 01:26
Var a, b : integer;
Begin
read(a,b);
if a < b then begin
a:= a+b;
b := a-b;
a:= a--b;
end;
writeln(a+2,' ', b * 2);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
тооироь
07.08.2020 12:40
Выполните это, слова надо подбирать с таблицы, числа рядом с вопросом это количество букв....
МаксимаДолгун02
01.04.2023 17:19
Между населёнными пунктами A,B,C,D,E построены дороги , протяженность которых приведена в таблице определите длину кратчайшего пути между пунктами A и Е Передвигаться можно...
lenatvoya
17.05.2023 09:56
Пользователь вводит 10 целых чисел (положительных и отрицательных). Посчитать, сколько из них отрицательных. Дано 10 целых чисел. Определить произведение тех из них, которые...
Ellenkpop
15.04.2020 08:09
Написати програму що знаходить значення виразу:1²+2²+3²+4²...
PetryxaMakvin
22.03.2021 03:30
Написать программу в паскале для решения неравенства bx+c 0...
driftsmuk1
22.03.2021 03:30
Футбольний м яч коштує 65 грн. отримати всі можливі варіанти оплати,якщо у покупця є 5,10 і 20 гривневі купюри. підрахувати кількість варіантів...
ForaN777
22.03.2021 03:30
5. определите маску для имен группы файлов: file.doc, ddg.dll, drug.d, forma.doc. в каталоге находятся пять файлов: fort.docx ford.docx lord.doc orsk.dat port.doc определите,...
екатерина702
25.11.2020 11:30
Найти «спрятанное» слово (соединяя слоги): а) обруч, кара; б) пастух, плотина, лагерь; в) сапоги, парашют, фантазия; г) косари, заморозки, лётчик; д) мука, рагу, диван; е)...
nastyasmirniv
24.09.2022 09:54
Укажите правильные записи кратности (multiplicity) конца ассоциации на диаграмме классов? выбрать несколько вариантов. вариант 1 1; 3 вариант 2 1..2, 4..* вариант 3 0 – 2...
KimTaeHyung3012
18.06.2021 04:44
Найдите число знакового целого типа, которое записано в 8-разрядной ячейке памяти компьютера так: «00»:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
read(a,b);
if a < b then begin
a:= a+b;
b := a-b;
a:= a--b;
end;
writeln(a+2,' ', b * 2);
End.