Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
nanakochieva72
28.11.2022 17:28 •
Информатика
Дано целое число а. если значение а< > 0, то необходимо уменьшить его на 4. написать программу для решения этой . программа должна иметь дружественный интерфейс.
Показать ответ
Ответ:
Gaga1111111
03.10.2020 18:12
Program chisloA;
Var a:longint;
Begin
readln(a);
If a<>0 then a:=a-4;
writeln(a);
End.
0,0
(0 оценок)
Ответ:
sukalovan0
03.10.2020 18:12
A = int(input())
if A > 0 or A < 0:
A -= 4
0,0
(0 оценок)
Популярные вопросы: Информатика
Reek5657
06.07.2020 16:57
Графическая информация на компьютере предоставлена номерами ondfu, чтобы проверить, правда ли ложь...
kitmyfaded
13.07.2022 04:38
4. Процессор может читать и записывать данные в долговременной только блоками (например, по 512 байт), а в оперативной памяти может обращаться сразу к каждому байту. Запишите последовательность...
Caxapok24
20.09.2020 00:10
Определите значение переменной а после выполнения алгоритма: a:= 9 b:=45 div a b:=b*10 a:=b mod 4 + 3...
valentinalobanova
22.12.2022 05:19
Дано число 1,5994E−3.Нормализованная запись данного числа: ...
GDA1
06.04.2022 08:01
Якою комбінацією клавіш можна змінювати розкладку клавіатури?...
nikitaoksin201
30.05.2021 22:51
Составьте программу сортировки по возрастанию значений трех переменных: а, в, с. продемонстрируйте данный алгоритм в виде блок-схемы....
елена1210
12.05.2020 19:06
Боря играет с друзьями в «Шляпу». В этой игре пишут на бумажках слова и кладут в шляпу, затем по очереди объясняют значение слов. В шляпе осталось три бумажки. Пока ребята обедают,...
kirillm3
08.05.2020 15:56
Как сделать герб Калуги на питоне? Я...
масяня114
26.04.2023 14:06
ТЕКСТ ЗАДАНИЯ Выбери верное утверждение про соревнование роботов Движение по линии Верных ответов: 1 Размеры и вес робота могут быть любыми. Максимальная продолжительность времени,...
jakupovaalbina
09.04.2022 23:05
Определите, имена двоих из трёх учеников, которые пришли в школу, если следующие два высказывания истинны: В школу пришли Роберт или Маша, но не оба вместе Неверно, что если Иван...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var a:longint;
Begin
readln(a);
If a<>0 then a:=a-4;
writeln(a);
End.
if A > 0 or A < 0:
A -= 4