• составьте программу сортировки по возрастанию значений трех переменных: A B C. плииииз, умоляю

Ответы 1

  • var a,b,c:integer;beginreadln(a,b,c);if (a>b) and (a>c) and (b>c) then writeln('c=',c,'b=',b,'a=',a) elseif (b>a) and (b>c) and (a>c) then writeln('c=',c,'a=',a,'b=',b) elseif (c>a) and (c>b) and (b>a) then writeln('a=',a,'b=',b,'c=',c) elseif (a>b) and (a>c) and (c>b) then writeln('b=',b,'c=',c,'a=',a) elseif (b>a) and (b>c) and (c>a) then writeln('a=',a,'c=',c,'b=',b) elseif (c>a) and (c>b) and (a>b) then writeln('b=',b,'a=',a,'c=',c) elsereadln;end.

    • Автор:

      fidel
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years