zadach213.BAS

{* Задача213 *}

REM basic

' Даны a, b, c, d. Если Max(a, b) < Min(c, d), то сообщить об этом.


CLS
INPUT "a = ", A
INPUT "b = ", B
INPUT "c = ", C
INPUT "d = ", D

maxAB = (A + B + ABS(A - B)) / 2
minCD = (C + D - ABS(C - D)) / 2
If maxAB < minCD Then PRINT "maxAB < minCD"

End