Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Nasteahdhdjek
30.09.2020 06:13 •
Информатика
Дано целое число а. если его значение а< > 0,то необходимо уменьшить его на 4. написать программу для решения этой .
Показать ответ
Ответ:
бринн
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 оценок)
Популярные вопросы: Информатика
Kirill12345qwert
27.05.2022 08:19
Написать программу: вычислить f (x) = x^2 + b, приx =1, на языке с++...
kakashonka1
27.05.2022 08:19
Какие свойства имеют линии, замкнутые области?...
ermekbaevadinara
27.05.2022 08:19
Напишите программу, которая заполняет массив случайными числами в диапазоне [a, b] и сортирует его “домиком” – до половины в порядке возрастания, затем – в порядке убывания....
КнОпОськА8965
30.04.2021 17:58
Надо выполнить задания в Excel которые написаны в прикрепленном файле Все сделайте по правилам и после выполнения отошлите ответ...
gardenberg17
30.05.2020 15:34
В MS Excel столбец однотипеых данных является А) полемВ) записьюС) формойD) отчетомЕ) ключом...
Mtaraska
03.08.2022 08:28
Номер подразделения — целое число от 1 до 1000, он записан на пропуске как двоичное число и занимает минимально возможное целое число байт (сколько?)...
Do6pblu322
11.06.2020 16:09
с использованием различных рисунков и фотографий создайте коллаж на приведенные сверху темы которые в изображении ...
ПомошницаНомер1
09.12.2020 02:56
1)каковы сходства и различия между составными и вложенными условиями 2) в каких случаях необходимо использование составных условий в программе 3) как написать составное условие,...
Serlous
07.10.2020 01:30
Нужно выбрать правильный вариант: 2)чтобы размножить фрагмент изображения, нужно 1.выделить его, а затем переместить при одновременно нажатых левой кнопке и клавише ctrl...
янубтытруп
22.06.2021 02:42
Постройте логическую схему: f = ¬(a*b*c)+(b*c+ ¬a), если a=1, b=1, c=0...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:integer;
begin
readln(a);
if a<>0 then a:=a-4;
writeln(a);
end.