Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
HikariRayto
09.01.2022 21:05 •
Информатика
Составить программу к в паскаль. дано число. если оно положительное, то увеличьте его на 1, в противоположном случае уменьшите его на 2. результат выведите на экран.
Показать ответ
Ответ:
умник1627
08.10.2020 06:18
Var
num: integer;
begin
read(num);
if num > 0 then write(num + 1) else write(num - 2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
КАТЯ3105
31.03.2022 01:59
1)записать в тетради программу, выводящую на экран сумму всех нечетных чисел в интервале от 0 до 1000. 2)знать операторы циклов. записать в тетради программу: вывести на экран...
sanjabr82oymx7f
24.05.2020 01:12
Как записывается число 754 8 в шестнадцатеричной системе счисления?...
avisotska
11.02.2020 06:01
Выберите элементы форматирования электронной таблицы. 1. Изменение границ 2. Изменение знака 3. Изменение формулы 4. Изменение центрирования СОР...
Elbek11ee
14.01.2020 10:36
Определить номер этажа квартиры девятиэтажного дома по указанному ее номеру N. Считать, что на каждом этаже каждого подъезда находится M квартир. Python...
VikaPika561
01.09.2022 01:17
Python Обчислити значення суми з точністю до е...
vittoriakostenk
16.04.2023 11:43
Книга набранная с компьютера содержит 320 страниц на каждой строке 48 строк в каждой строке 72 символа мощность используемого алфавита 125 символов. Каков объем информации в книге?...
Bro456804
22.07.2020 04:40
3. Кестеніқажеттіақпараттарментолтырыңдар(1.3-кесте).1.3-кестеКОМПЬЮТЕРАдамАқпаратты сақтауАқпаратты өңдеуАқпаратты қабылдауЕнгізу құрылғысыАқпаратты жіберуСөз, қозғалтқышжүйелері...
крис898
08.06.2020 03:36
Сделать программу в C#: 1) Дано четырехзначное число. Необходимо проверить, различны ли все четыре цифры этого числа. 2) Даны три целых числа. Найти среднее из них (больше одного,...
NastyKot15246
21.07.2022 12:36
Буде благодарен даю 45 б P.S. решить только 7 вопросов и все)...
mboyko2005
26.07.2022 01:50
Ребят. Смотрите у меня 8 гб ddr3 оперативы, intel core i3 4170, nvidia geforce gtx 650 ti, 320gb жеский, материка с Алика за 3к. как думаете 650w блока хватит?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
num: integer;
begin
read(num);
if num > 0 then write(num + 1) else write(num - 2);
end.