logo
Войти Регистрация Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Lane9ig
Lane9ig
30.01.2021 12:07 •  Информатика

1) пусть дано целое число i. требуется оставить его без изменения, если оно делится на 2, и вычесть из него 1, если это не так

Ответ:
taroslav
taroslav
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 оценок)
Популярные вопросы: Информатика
liza2002623
liza2002623
17.01.2020 16:04
Язык c++ Напишите процедуру с параметром n, которая выводит ёлочку с кроной высотой n Основная программа должна содержать ввод значения переменной n и вызов процедуры Примеры Входные...
helpistupit
helpistupit
16.11.2022 18:26
1)найти в массиве все отрицательные элементы 2)составить программу уменьшения всех элементов массива в три раза...
qqqqqqqqqqq1qq1
qqqqqqqqqqq1qq1
16.11.2022 18:26
Оператор ветвления что будет если выведено на экран. begin a: =120 if a 120 then n: a+50 else n: a-10; writeln (n) end n=?...
EZno
EZno
09.06.2021 23:23
Задача на языке python. n! / m!( n - m )! решить эту задачу используя функцию факториала....
Koskool
Koskool
25.05.2023 21:44
Слова с прописной буквы Дана строка. Измените регистр символов в этой строке так, чтобы первая буква каждого слова была заглавной, а остальные буквы — строчными. Словом называется...
Ameya
Ameya
11.09.2021 14:19
исправить программу с++ #include stdio.h #include iostream #include string using namespace std;int main(){ int i, d=0 string s; cout Введите строку ; getline(cin,s); for(int i=0;i...
оля2036
оля2036
25.10.2022 22:06
Перечислите преобразования царя «царей»?​...
Ivanlabur
Ivanlabur
25.10.2022 22:06
Какие Великие географические открытия повлияли на развитие отношений между европейскими странами и вновь открытыми странами и их народами?​...
KINGAsyaKING
KINGAsyaKING
25.10.2022 22:06
Сформулируйте самостоятельно и запишите понятия моделирование​...
aleksandra1011
aleksandra1011
09.10.2022 15:55
Найдите число если 5/47 его равны 15​...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?