Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
alinzik3
10.10.2021 09:52 •
Информатика
'ввести два числа (а, b), если разность чисел b и а отрицательна и делится на 4, то удвоить разность.' , ..
Показать ответ
Ответ:
LoL228LoL228LoL228
03.10.2020 12:50
Var
a, b: integer;
begin
readln(a, b);
a := b - a;
if (a < 0) and (a mod 4 = 0) then
writeln(4 * a)
else writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
petrovadasha200Fhcd
25.08.2022 18:16
Петя Торопыжкин познакомился с гипотезой Коллатца: какое бы натуральное число a0 ни взять, последовательность (часто называемая сиракузской ), вычисляемая от выбранного числа по...
mariapopova77
03.08.2020 02:29
выдаёт ошибку incompatible types: got Double expected Lounglnt var i,n,s: integer;beginn:=100;s:=0;for i:= 1 to 6 dobegins:=s+n;n:=n/5;end;labels.caption:=inttostr(s);end;end....
laf03
20.05.2020 10:54
Питон , Магическим квадратом называют таблицу, в которой записаны числа 1,2,3,… по одному разу, так что сумма чисел в каждой строке и в каждом столбце равные. Мы расскажем вам об...
berezenetsdash
24.05.2020 20:21
Сколько килобайт информации содержит сообщение объемом 2 мегабайта?...
liyamenkova
24.05.2020 20:21
Закончите предложение: «алгоритм, в котором команды выполняются в порядке их записи, то есть последовательно друг за другом, называется …» линейным ветвлением циклическим...
julyazolotko20
24.05.2020 20:21
Сдиаграмм эйлера-венна решить поставленную через систему.в ящике лежат 120 деталей, из них на автомате №1 обработано 82 штуки, на автомате №2 – 23, а на автомате №3 – 42 штуки. 18...
DenisРоссия
01.05.2021 12:40
Pygame. Display. Get_surfase значения этой функции...
АртемGoloborshev
18.04.2023 21:32
Какие виды компьютерной графики широко известны сегодня? *2D3D4D5D...
маняня4
18.04.2023 21:32
Информатика(Очень Надо узнать,что стоит вместо ,,? (x или y или z или w).Заранее огромное...
kignkfleh
08.01.2021 13:57
Выберите правильный путь к файлу : 1) 3:LIST.EXE; 2) IN3:.TXT; 3) С:\VVR\12345.BMP; 4) SPRAVKI....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a, b: integer;
begin
readln(a, b);
a := b - a;
if (a < 0) and (a mod 4 = 0) then
writeln(4 * a)
else writeln(a);
end.