• Даны три числа АВС. Составьте программу, которая упорядочит их по возрастанию?

Ответы 1

  • vara,b,c,max,min,mid:real;beginreadln(a,b,c);if (a>b) then begin max:=a; mid:=b end else begin max:=b; mid:=a end;if c>max then  max:=c else if c>mid then begin min:=mid; mid:=c end;write(min,' ',mid,' ',max);end.
    • Автор:

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

Войти через Google

или

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

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

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