Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Тане44ка
02.01.2020 19:55 •
Информатика
Составьте программу, заменяющую меньшее из двух данных чисел их суммой, а большее - удвоенным произведением этих чисел.
Показать ответ
Ответ:
kannoesubaru37
03.10.2020 23:31
2014-04-06T04:57:38+00:00
Program pf;
var x,y,a,b:integer;
begin
read(x);
read(y);
a:=x; b:=y;
if x>y then begin x:=a*b; y:=a+b; end else begin x:=a+b; y:=a*b; end;
write(x,y);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
moonmyrreg
23.02.2022 04:28
Даны отрезки - a,b,c,d для какждой тройки этих отрезков, из которых можно построить треугольник, напечатать площадь данного треугольника. (используйте процедуру prints(x,y,z), печатающую...
МенязовутКатяЗвога
30.08.2020 18:27
ТЕКСТ ЗАДАНИЯ Составить программу ввода оценки P, полученной учащимся, и выдачи текста «Молодец!», если P=5, «Хорошо!», если P=4 и «Лентяй!», если Р =3. a...
liza901283
06.06.2021 01:11
По сети получено сообщение 100111111010 которое состоит из 4-битных блоков. В каждом блоке последний бит - это бит чётности. Постройте исходное сообщение удалив биты чётности....
Julia517517
12.11.2020 06:42
Между населёнными пунктами A, B, C, D, E, F построены дороги, протяжённость которых (в километрах) приведена в таблице. Определите длину кратчайшего пути между пунктами A и F, не...
diniska3
09.05.2020 06:18
Какие существует меры по защите от информационных преступлений ? Какие меры вы могли бы предложить сами?...
Stefan123005
25.01.2021 09:16
23.Два потяги, швидкості яких А1 та В1 виїхали з різних міст назустрічодин одному і зустрілися через C1 годин. За до якої формулиExcel можна обчислити відстань між містами. 1)=...
misha666anibeat
03.04.2020 13:51
Разделить массив на две части, поместив в первую элементы, большие среднего арифметического массива, а во вторую - меньшие (части не сортировать). Нормального решения на других...
polina2004121
12.09.2021 08:18
Найди сходства и различия ссылок и гиперссылок с диа- граммы Венна. Это информатика ...
Лучік12
07.03.2020 20:17
по ARDUINO Задание: Подключить 3-4 светодиода. Напишите код, который будет настраивать частоту моргания светодиодов, регулируемую реостатом. В покажу подключение, пришлите мне код....
MelinMelomGii
25.11.2022 06:48
Создателем древнейшей дошедшей до нас летописи считается: 1)нестор 2)митрополит илларион 3)дионисий 4)афанасий никитин...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Program pf;
var x,y,a,b:integer;
begin
read(x);
read(y);
a:=x; b:=y;
if x>y then begin x:=a*b; y:=a+b; end else begin x:=a+b; y:=a*b; end;
write(x,y);
end.