Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kseniamurzakova
31.01.2022 03:50 •
Информатика
Составьте программу которая находит меньшее из трех введенных с клавиатуры чисел a,b,c и выводит его на экран
Показать ответ
Ответ:
Cerd
08.07.2020 23:54
На языке Pascal:
var a, b, c:integer;
begin
readln(a, b, c);
if (a<b) then begin
if (a<c) then
writeln(a);
end
else if (b<c) then
writeln(b)
else
writeln(c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Kuса
17.03.2023 14:11
Разработка алгоритма. Урок 1 Описана модель задачи с алгоритма. Определи форму записи алгоритма.Ввод значений переменных a, b, c.Если значение переменной а больше значения переменной...
cuxoyww
02.10.2022 08:02
Сколько раз выполниться тело цикла i:=4; while i 10 do i:=i+3;(В ответе укажите только число) *...
dog126
07.06.2023 22:27
нужно Решение нужно на Делфи, вместе с формой желательно. Даны два целых числа A и B (A B). Найти сумму всех целых чисел от A до B включительно....
МастерФейк
31.12.2020 14:55
Составить программу вычисления среднего , набранного спортсменом - многоборцем (предусмотреть 3 вида спорта) это паскаль...
sevtour
12.05.2022 04:06
Таня написала название своего родного города и все его циклические сдвиги, получив таблицу 1. затем, упорядочив эти слова по алфавиту, она составила таблицу 2 и выписала последний...
anyakhrebtova
27.02.2020 09:46
Сообщение, записанное буквами из 64 - символьного алфавита, содержит 500 символов. какой объём информации (в килобайтах) оно несёт?...
Polinochka570
07.02.2021 08:54
Решить вася выше саши на 8см. а коля ниже саши на 3 см. кто из мальчиков самый высокий? на сколько сантиметров...
разетка1234
07.02.2021 08:54
Удедушки спросили сколько ему лет, он ответил если я проживу половину своих лет и один год то мне будет ровно сто лет...
egor44rus
07.02.2021 08:54
поклоняясь многим богам, славяне поклонялись силам природы. собственно природа, близкая и знакомая, но одновременно страшная и вян .найди доказательства этого утверждения в именах...
toniskvortsov1
07.02.2021 08:54
Может ли человек обойтись без правил этикета? почему?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a, b, c:integer;
begin
readln(a, b, c);
if (a<b) then begin
if (a<c) then
writeln(a);
end
else if (b<c) then
writeln(b)
else
writeln(c);
end.