Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
flower57
19.03.2020 19:12 •
Информатика
1) пусть дано целое число i. требуется оставить его без изменения, если оно делится на 2, и вычесть из него 1, если это не так
Ответ:
ryslan3222
06.10.2020 13:02
Var
i: integer;
begin
readln(i);
if i mod 2 = 0 then
writeln(i);
else
writeln(i-1);
end
0,0
(0 оценок)
Популярные вопросы: Информатика
mixa7132ozoc5l
05.03.2023 13:28
Доказать, используя таблицу истинности, что логические выражения « не - А или не B» и «A и B равносильны»...
kannaaa
08.09.2021 02:58
Народ, как прокачивать Тарталью? Какие артефакты и лук ставить?...
ruslikua3
02.12.2021 19:38
Маша составляет 7-буквенные коды из букв И, З, У, Ч, А, Т, Й. Каждую букву нужно использовать ровно 1 раз, при этом в коде буква Й не может стоять на первом месте, а также...
zadrotovg
08.02.2022 12:34
1. в массиве из 70 целых чисел найти количество элементов, кратных 3 2. проверить, что в массиве ровно 3 одинаковых максимальных числа 3. в массиве удалить все элементы, имеющие...
Demiali41
06.01.2021 09:30
Ученик набирает сочинение по на компьютере, используя кодировку koi-8. определите какой объём памяти займёт следующая фраза: молекулы состоят из атомов!...
qidanabala
17.08.2021 15:51
Из десятичного в шестнадцатеричное и в двоичную() переведите, , данное выражение в n₁₆ и в n₂ 295₁₀-1958₁₀...
nikitleas
03.07.2021 14:20
Сформулировать и вывести на экран последовательности из n элементов датчиком случайных чисел из промежутка (- 23; 34)...
grigormehrabyaoyl8pz
23.04.2023 15:30
Решить не (( первая буква гласная) и (последняя буква согласная)) какое из вариантов ответов ложно? a) анна b) вера c) виктор d) иван...
Milli205
21.09.2021 10:27
Напишите 5 конкретных примеров сетевых моделей...
89229131414
11.11.2020 05:48
Уисполнителя квадратор две команды, которым присвоены номера. 1. возведи в квадрат.2. вычти 3.первая из них возводит число на экране во вторую степень, вторая- вычитает из...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i: integer;
begin
readln(i);
if i mod 2 = 0 then
writeln(i);
else
writeln(i-1);
end