Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
hard26
11.03.2022 11:32 •
Информатика
Дано целое число а. если его значение а< > 0,то необходимо уменьшить его на 4. написать программу для решения этой .
Ответ:
Mirano2004
23.06.2020 19:17
Uses crt;
var a:integer;
begin
readln(a);
if a<>0 then a:=a-4;
writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Карина28022802
12.06.2021 14:14
(не понимаю) как книгу на полке сделать источником и видом воспринимаемой информации? альбом с фотографиям, запись маркером на классной доске, электронный дневник, cd...
solnechnaya2
12.06.2021 14:14
Три подружки - ксюша, лена и даша – купили в магазине груши, яблоки и сливы, причём каждая девочка покупала только один вид фруктов и все покупки у них были разные. на...
саша3421342
18.01.2021 04:27
Найти сумму всех двузначных чисел, кратных 5. условный оператор не использовать...
vitalii1962svet
18.01.2021 04:27
Как на информатике 3 класс горячев 1-ая часть раздел два №5 сделать свой чайнворд?...
GenGis
18.01.2021 04:27
Синформатикой! скласти алгоритм на знаходження добутку та різниці чисел a і b...
зара120
20.07.2021 12:10
Составить программу в паскале ...
vavilina000
12.11.2022 22:49
Написать программы для массива из 10 целых чисел: 1)Найти произведение отрицательных чисел2)Найти сумму честных чисел3)Найти количество чисел кратных 3...
bhsdvsbvgvfsbvefe
02.09.2022 22:01
Восстановите условия задачи и ее решение. При взаимодействии кислорода с водорода образовалось 7,2 г воды.Определите необходимый объем кислорода при н.у....
lianagabrielya
02.09.2020 00:04
Замените местоимение I на местоимения he или she по образцу. Образец: I go to the office every day. — He goes to the office every day. 1. I write many letters every day....
Nastyavoyko
02.09.2020 00:04
Определите химический состав клубочкового фильтрата (множественный выбор) A) ГлюкозаB) АминокислотыC) Перитубулярные капиллярыD) КрахмалE) ЦеллюлозаF) Мочевая кислота...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a:integer;
begin
readln(a);
if a<>0 then a:=a-4;
writeln(a);
end.