Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
superman48
03.09.2020 13:32 •
Информатика
Составьте программу сортировки по возрастанию значений трёх переменных: a,d,c.
Показать ответ
Ответ:
lolol6y
04.10.2020 10:21
Var
a, d, c, t: integer;
begin
readln(a, d, c);
if a < d then begin t := a;a := d;d := t; end;
if a < c then begin t := a;a := c;c := t; end;
if d < c then begin t := d;d := c;c := t; end;
writeln(a, ' ', d, ' ', c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Polika127
10.04.2020 00:55
Алфавит некоторого племени состоит из 16 символов сколько информации несёт сообщение,записаное при этого алфавита,состоящее из 110 символов...
damirpernebek7
10.04.2020 00:55
Напишите в с++ дан номер месяца — целое число в диапазоне 1–12 (1 — январь, 2 — февраль и т. вывести название соответствующего времени года («зима», «весна», «лето», «осень»)....
leonru1
16.02.2021 18:55
Аня,лена,таня и оля заняли первые 4 места в соревнованиях по плаванию.на вопрос какие вы заняли места? девочки ответили: -аня не была третей -оля не заняла ни первое,ни третье...
KiskaDasha
29.09.2022 08:04
2. Дана таблица по продажи компьютерной техники. А) Определите какой формат ячеек А6:А14 Б) Определите какой формат ячейки В3...
jfisnrj
27.07.2020 22:44
Дано целое число в диапазоне 100-999.вывести строку -словесное описание данного числа.программа на языке паскаль...
milkivey3
27.07.2020 22:44
Что вы можете сказать о числах 111 и iii?...
Asuamasya
31.05.2020 04:55
Отметьте устройство компьютера,предназначеное для обработки информации внешняя память оперативная память процессор монитор клавиатура...
kirillkosyarev
07.07.2022 17:55
Хімія. будьласка до ть...
missmekhtiyeva110803
31.10.2022 21:49
Назови название процессов при которых одни вещества превращаются в другие...
1234567891248
31.10.2022 21:49
Записати характеристичну групу кожного: пропаналь, фенол, целюлоза, анілін. записать характеристической группу каждого: пропаналь, фенол, целлюлоза, анилин....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a, d, c, t: integer;
begin
readln(a, d, c);
if a < d then begin t := a;a := d;d := t; end;
if a < c then begin t := a;a := c;c := t; end;
if d < c then begin t := d;d := c;c := t; end;
writeln(a, ' ', d, ' ', c);
end.