Войти
Регистрация
Спроси 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 оценок)
Популярные вопросы: Информатика
mitienko811
17.04.2022 02:50
Информатика. Всё на фото:...
Taddi
12.11.2022 15:40
К данному поколению компьютеры, произведенные с 1975 года по настоящее время. В этих компьютерах стала возможной одновременная эффективная работа звуковой, видео-, системной и других...
Reek5657
06.07.2020 16:57
Графическая информация на компьютере предоставлена номерами ondfu, чтобы проверить, правда ли ложь...
kitmyfaded
13.07.2022 04:38
4. Процессор может читать и записывать данные в долговременной только блоками (например, по 512 байт), а в оперативной памяти может обращаться сразу к каждому байту. Запишите последовательность...
temayurin2016
23.05.2020 07:42
Используя черепашью графику и цикл for напишите программу, которая будет рисовать многогранные и сложные фигуры Задание №2 Напишите программу, которая будет имитировать игру в кости...
LegPug
13.04.2020 21:13
Написать программу на Python....
Caxapok24
20.09.2020 00:10
Определите значение переменной а после выполнения алгоритма: a:= 9 b:=45 div a b:=b*10 a:=b mod 4 + 3...
ilnasgo54
24.06.2021 11:14
Решите задачу по информатике...
Шаров2005
24.02.2020 08:13
Посмотреть видео и написать программу, которая рассматривается в данном ролике: https://www.youtube .com/watch?v=ufKlHdNhP9E&t=84s Задача: Написать программу, которая не используя...
valentinalobanova
22.12.2022 05:19
Дано число 1,5994E−3.Нормализованная запись данного числа: ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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