Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Sashunya20061
07.08.2022 20:00 •
Информатика
Необходимо ввести некоторое целое число и если оно четное уменьшить его в 2 раза.составить программу на паскаль
Ответ:
yatsunvalya
08.10.2020 10:29
Var
a:longint;
begin
read(a);
if (a mod 2 = 0) then
a:= a div 2;
writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Аринусик111
24.03.2022 16:03
1. Какие существуют форматы текстовых файлов и чем они отличаются друг от друга?2. В каком формате нужно сохранить файл, чтобы он мог быть прочитан вдругих приложениях...
valerija1234
10.02.2020 20:09
Скорость передачи данных по некоторому каналу связи равна 128 Кбит /с. Передача файла по этому каналу связи заняла 2 мин. Определите размер файла в мегабайтах, ответ...
chelokoshka03
24.02.2020 06:05
Всем хай!Я опять у вас мне! Тут надо определить верно или неверноТут 2 вопроса!Так что го только побыстрее!Ещё...
1SoFi1
02.11.2021 05:06
Задание по рисунку, использовать ветвление в кумире...
0304131
05.02.2022 01:09
Установи соответствие между названием программ и их логотипами...
Рппеегпрне
17.10.2021 00:25
Кестені белгілегеннен кейін пайда болатын жолдар санын анықта.ВставкаРисованиеКонструктор...
Эзоз
11.02.2021 13:51
Выбери компьютерные модели. Верных ответов: 2 Там в рис 1 кукла а в рис два лебедь из бумаги...
Darina0090
29.01.2021 21:16
Перед тобой имя файла с расширением. Отметь, какой файл перед тобой. Упражнение.jpg — Документ.pdf — ...
barina201720071
30.10.2020 19:59
80. Не изменяются по числам существительные A) интернет, джинсы В) сутки, принтерC) диск, компьютерD) сайт, файлE) формула, молодежь...
dafnaliquor20
07.10.2020 08:58
В алгоритме, записанном ниже, используются переменные a и b. Символ «:=» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a:longint;
begin
read(a);
if (a mod 2 = 0) then
a:= a div 2;
writeln(a);
end.