Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
идьме
02.12.2020 03:25 •
Информатика
CРОЧНО Дано целое число. Если оно является положительным, то прибавить к нему 1 ; если отрицательным, то вычесть из него 6; если нулевым, то заменить его на 12. Вывести полученное число.
Ответ:
ЛинкаСимка
23.04.2020 06:30
Var a:integer;beginread(a);if a>0 then a:=a*2;if a<0 then a:=a-6;if a=0 then a:=12;write(a);end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Jaims
19.02.2023 21:05
Написать программу для решения квадратного уравнения: на вход программе коэффициенты a,b,c, программа должна вывести значения x1, x2 заранее ....
kisslenkayaozax1i
19.02.2023 21:05
Вкодовом замке имеются 2 кнопки 1 и2 дверь откроется, если в набранной последовательности две подряд идущие цифры образуют правильный код - какое-то двухзначное число....
maschkuznetsov
31.12.2022 08:57
1) сообщение содержит 400 символа . сколько символов в алфавите если сообщение содержит 150 байт информации ? 2)информационное сообщение занимает 80 строк по 55 символов...
Марина17681
16.06.2022 07:30
Что надо написать вместо многоточия, чтобы вывести элементы массива X из N элементов в обратном порядке? В ответе не используйте пробелы. for k in range(N): print ( ......
ddjd1
16.06.2022 05:30
Ребята Напишите программу в питоне чат-бот .Бот должен:иметь 4 функции.Например Музика,Игры,Фильм и т.к на каждую категорию должен быть код.В проекте лолжны бвть функции:int,print,input,while,for...
RL228
12.07.2021 20:37
Расставить запятые! Это очень надо...
kViktoria2077
12.07.2021 20:37
Объем информационного сообщения составляет 3 Кб. Выразить его вбитах...
irabirykova18
22.02.2022 00:56
Контрольная работа решите уравнение 8 9/26-Х=5 7/38...
Nikolayal
22.02.2022 00:56
606. Ширина прямоугольника равна 12 мм, а периметр - 22 см. Найдите длину...
0трупики0
15.03.2023 19:00
(11) Спиши словосочетания. Вставь пропущенные буквы в суф- фиксы имён прилагательных. Разбери имена прилагательные посоставу.Заносч...вое поведение, дождл...вый день,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Var a:integer;beginread(a);if a>0 then a:=a*2;if a<0 then a:=a-6;if a=0 then a:=12;write(a);end.