В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
natalirm
natalirm
04.09.2022 11:22 •  Информатика

В. сортировка на троих
(время: 1 сек. память: 16 мб, 100 )
заданы три целых числа. необходимо вывести их в порядке возрастания. числа не превышают 10° по
модулю. формат входных данных три числа, разделенные пробелом. формат результата. три числа в
порядке возрастания, разделенные пробелом.
примеры
входные данные
2 37 9
результат работы
2 9 37​

Показать ответ
Ответ:
НастяМалюга1
НастяМалюга1
10.10.2020 07:43

Т.к уточнений нет, то написал на Pascal самым простеньким методом.

Проверьте всё ли тут, что требуется.

var

 a,b,c,d,f,g:integer;

begin

 writeln('Входные данные');

 readln(a,b,c);

 if (a<b) and (a<c) then  

   d:=a;

 if (b<a) and (b<c) then  

   d:=b;  

 if (c<b) and (c<a) then  

   d:=c;

 if (a>b) and (a>c) then

   g:=a;

 if (b>c) and (b>a) then

   g:=b;

 if (c>b) and (c>a) then

   g:=c;

 if (a>d) and (a<g) then

   f:=a;

 if (b>d) and (b<g) then

   f:=b;

 if (c>d) and (c<g) then

   f:=c;

 writeln('Результат работы');    

 writeln(d+' '+f+' '+g);        

end.  

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота