|
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
|