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

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

Ответ:
xabibullinaeliza
xabibullinaeliza
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
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?