Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
MaveJ
16.06.2022 04:40 •
Информатика
Составьте программу для решения следующей . введите с клавиатуры два числа: а и в. если числа не равны, то замените каждое из них большим и выведите результаты на экран. если они равны, то найдите и выведите удвоенную сумму этих чисел.
Показать ответ
Ответ:
Julia20033112
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 оценок)
Популярные вопросы: Информатика
nikaa5522
20.09.2021 04:49
Задача 1: Дан массив С, размерностью 24. Сформировать массив Z, каждый элемент которого вычисляется по арифметическому выражению Z(I)=сtgC(I)+7*i5). Оба массива...
hyyeblan5577
02.12.2022 20:04
Составишь программу на языке посталь а) вычислить сумму модулей элементов массива x(15). б) выселить произведение модулей элементов массива b(15)...
lavanda16
19.05.2020 23:34
C++ Переменной K присвоить номер четверти плоскости, в которой находится точка с координатами X и Y ( XY≠0)....
карольчик1
26.06.2021 15:06
C++ Точка задана координатами X, Y. Определить, находится ли эта точка внутри круга радиусом R с центром в начале координат....
Айсара777
19.01.2022 05:49
C++ Найти значение функции, вычисляемое по формуле: при у=cosx^2 0 x 2, иначе y=1-sinx^2...
FaceLess111
26.08.2022 12:27
Ввести с клавиатуры массив из 5 элементов,найти среднее арифметическое всех элементов массива?...
bonipasol1
20.08.2021 08:55
16)изменения содержания текста, исправление ошибок.(14 букв) 16)перемещение фрагмента текста в буфер обмена.(9 букв) 17)последовательность символов, ограниченная...
lolololololf
14.03.2023 13:01
Даны пятизначное и четырехзначное числа . вычислить квадратный корень суммы десятков тысяч и сотен пятизначного числа и десятков четырехзначного числа. паскаль...
Asuacom
02.02.2022 15:07
Pascal abc. напишите программу! дан массив размера n. вывести последний нечетный элемент массива и его номер...
vania666
25.04.2021 08:10
Почему для изготовления моделей требуются стержни разной длины?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.