Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Keks5478568
28.01.2021 05:36 •
Информатика
Составить программу и блок-схему для : введите числа a b n если оба числа > n, то напечатайте слово "больше" если < n то слово "меньше", иначе напечатайте n "в промежутке между а и в"
Показать ответ
Ответ:
dhhdhhd55
22.06.2020 04:53
program se;
uses crt;
var
a,b,n:integer;
begin
writeln('Введите число А: ');
read(a);
writeln('Введите число В: ');
read(b);
writeln('Введите число N: ');
read(n);
if (a > n) and (b > n) then writeln('Больше')else
if (a<n) and (b<n) then writeln('Меньше')else
writeln('В промежутке между А и В');
end.
Блок схему сейчас не могу нарисовать, да и она простейшая.
0,0
(0 оценок)
Популярные вопросы: Информатика
025858
16.05.2023 07:51
Вчём разница между калькулятором и компьютером...
айка392
05.02.2021 02:21
Расскажите, что вы знаете об информации....
Rita53
30.05.2023 12:04
Ақпаратты өлшеу туралы конспект...
irinasid
18.08.2021 15:47
Що таке новітні технолохії? як вони використовуються?...
Сергей12318
08.09.2022 01:28
Из ключевого слова зима закодировать слова компьютер и интернет с шифра Виженера...
azzzzzi208
27.05.2020 23:47
развлечения инструментов в 2G и 3G программах в том что двумерные фигуры рисуется в Кна плоскост а трехмерные...
kristinavasina1
09.08.2022 11:38
Создайте таблицу “Озера Европы”, используя следующие данные по площади (кв. км) и наибольшей глубине (м): Ладожское 17 700 и 225; Онежское 9510 и 110; Каспийское море 371...
Ritochkа
14.10.2022 19:21
Дана таблица. Определите тип данных столбцов А,В,С...
lizahi
30.08.2022 10:46
Укажите все верные утверждения. 1)в зависимости от расширения операционная система для файлов показывает различные значки, а при двойном щелчке запускает, связанную с этим...
epikhinanatuly
08.12.2022 02:52
ответить на вопросы по информатике, тема архивация .1. почему есть возможность уменьшать размер файлов? 2. что такое архивация? 3. какие файлы не имеет смысла архивировать?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
uses crt;
var
a,b,n:integer;
begin
writeln('Введите число А: ');
read(a);
writeln('Введите число В: ');
read(b);
writeln('Введите число N: ');
read(n);
if (a > n) and (b > n) then writeln('Больше')else
if (a<n) and (b<n) then writeln('Меньше')else
writeln('В промежутке между А и В');
end.
Блок схему сейчас не могу нарисовать, да и она простейшая.