Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
usurge
29.12.2021 04:37 •
Информатика
Дано целое число а. если значение а< > 0, то необходимо уменьшить его на 4. написать программу для решения этой . программа должна иметь дружественный интерфейс.
Показать ответ
Ответ:
arinalomova13
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 оценок)
Ответ:
madinamerzhoeva
03.10.2020 18:12
A = int(input())
if A > 0 or A < 0:
A -= 4
0,0
(0 оценок)
Популярные вопросы: Информатика
Nactyxa2003
18.11.2022 17:20
Дан алгоритм на языке грис: шаг шаг поворот поворот поворот шаг шаг прыжок прыжок прыжок шаг шаг поворот поворот поворот шаг шаг прыжок прыжок прыжок шаг шаг поворот поворот...
iwliliya18
02.06.2020 01:25
ОЧЕНЬ Начертите фигуру, изображенную на рисунке, используя вс алгоритм с аргументами для рисования отдельного элемента. Количество повторений элементов и количество повторений...
ShEnNnY
25.02.2020 13:07
Задание 1 Вопрос:Как записывается инструкция, которая формирует символьную строку заданного формата?Составьте слово из букв:ARMFTO - Задание 2Вопрос:Какая символьная строка...
Клер11330
27.06.2021 02:55
Напишите вопросы к повести в дурном обществе...
ivabogdan
27.06.2021 02:55
Почему пришвин вначале назвал свой рассказ друг человека , а потом сменил название на кладовая солнца ?...
кукушка138
27.06.2021 02:55
Электронная формула азота +5 электронная формула углерода -4...
emphasisone
27.06.2021 02:55
Основная мысль произведения л.н толстого два брата...
рогозина
27.06.2021 02:55
Водной из кодировок unicode каждый символ кодируется 16 битами. оцените размер следующего предложения в данной кодировке. «куда так, кумушка, бежишь ты без оглядки? » — лисицу...
egor228133722
27.06.2021 02:55
А) вычислите длину окружности, диаметр которой равен 10 см; 2,5 м. б) вычислите длину окружности, радиус которой равен 7,5 см; 5 м....
dashaevа07
27.06.2021 02:55
Фонетический разбор слова заливы. гласная а в транскрипции будет звучать как а или как о?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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