Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Kapusto4ga
09.05.2020 09:17 •
Информатика
Напишите программу нахождения наименьшего значения среди трех величин: А,В,С.
9 класс / Pascal
Ответ:
avdzhrr
15.10.2020 08:59
var a, b, c, min: integer; begin read(a, b, c); if a < b then if a < c then min := a else min := c else min := b; write('Мин: ', min); end.
или так:
beginReadArrInteger(3).Min.Printend.
Пример работы:
0,0
(0 оценок)
Популярные вопросы: Информатика
TESSORO
29.04.2023 19:06
Расшифруйте ребус-систему: NO * NO = NET,ON * ON = TEN, если разным буквам соответствуют разные цифры, а одинаковым буквам – одинаковые цифры. Требуется привести развёрнутое решение....
risha5239
28.02.2023 14:55
В чем ошибка? Напишите правильный код. За правильный код Желательно с объяснениями , нужна ваша...
akaev1087
10.03.2021 15:30
Получить внутреннее представление чисел 372 и -372 в 16-разрядной ячейке памяти в формате со знаком....
ВладВишня
16.09.2020 04:22
Кформатированию текста слайда не относится а. форматирование шрифта (гарнитура, начертание, размер, эффекты, цвет) б. преобразование текста в маркированный или нумерованный список...
katakaty23431
16.09.2020 04:22
Чем отличается библиотека от интернета...
ТамараБерезанка
21.04.2023 12:01
Определите что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin n : = 2; s : = 35; while n = 25 do begin s : = s + 20; n : = n + 5 end;...
супербятя
23.12.2021 05:16
Дан массив целых чисел х =20 найти минимальное и максимальное значения...
АлёнаKet234
18.04.2022 16:42
Причини та наслідки громадянської війни у Франції 50-60рр. 16 ст....
margaritamaurses
08.08.2021 19:39
Спишите текст, вставьте на месте пропусков однородные или неоднородные определения. Подчеркните волнистой линией однородные определения. УЛЕТАЮТ ГУСИ Идет дождь. С ветром. То моросящий,...
nik667755mm
24.03.2022 05:27
А) Как завоевание Южного Казахстана повлияло на соседние государства ? Б) С какой целью Россия стройла военные укрепления? В) Какое система управления появилась в Южном Казахстане?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
или так:
beginReadArrInteger(3).Min.Printend.Пример работы: