Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Ванёк20061
05.08.2020 19:44 •
Информатика
Составьте программу для решения следующей . введите с клавиатуры два числа: а и в. если числа не равны, то замените каждое из них большим и выведите результаты на экран. если они равны, то найдите и выведите удвоенную сумму этих чисел.
Показать ответ
Ответ:
Kotvo4cah
15.07.2020 16:59
var
var
a,b: integer;
begin
readln (a,b);
if a = b then
writeln (4*a)
else
writeln(a+1,' ',b+2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
the1rgn
25.03.2020 10:13
Чему будет равно значения переменной x после выполнения команды x : = x+2 ,если до ее выполнения оно было равно 3 ? а) 1 б)2 в)3 г) 5...
егормицевич
08.10.2021 21:38
Выберите пример условного алгоритма в кратком виде варианты: а) for i=1 to n do b) if a 0 then a: =1 else a=0 c) if a 0 then a: =a+1 d) while a 0 do...
beysekeevadaniy
21.02.2021 12:38
Что называется сетевым протоколом 1)договор о подключении к сети 2)перечень устройств для подключения к сети 3)программа для подключения к сети интернет 4)соглашения и правила...
Dina333098
18.05.2020 14:15
Из каждых трёх выберите два высказывания, являющихся отрицаниями друг друга:1) 1999 2000 , 1999 2000 , 1999≤2000 ;2) Петя решил все задания контрольной работы , Петя не решил...
Pygacev1959
07.09.2022 09:42
Какие значения примут переменные х и у в результате выполнения следующих фрагментов умоляю:...
ulzhan16061999
04.03.2023 15:11
Нужна в решении заданий Заранее...
Messi111111111111111
14.02.2020 07:37
Бурые и красные водоросли.среда обитания? особенности строения? значение? представители?...
nastiabl5ct
14.02.2020 07:37
Твір на тему поспішиш,людей насмішиш...
40523
14.02.2020 07:37
Материальная точка движется прямолинейно по закону s=. найдите момент ускорения этой точки в момент t=2...
Karina5252
14.02.2020 07:37
Равные отрезки ab и cd пересекаются в точке o, при чем ac параллельно bd. докажите, что треугольник aoc равнобедренный. ( трапеции, теорему пифагора не изучали, программа 7...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
a,b: integer;
begin
readln (a,b);
if a = b then
writeln (4*a)
else
writeln(a+1,' ',b+2);
end.