zadach131.BAS

{* Задача131 *}

REM basic

' Найти наибольшее и наименьшее из двух заданных чисел A и B.


INPUT "A=";A 
INPUT "B=";B 
X=(ABS(A-B)+A+B))/2 
Y=(A+B-ABS(A-B))/2 
PRINT "X=";X 
PRINT "Y=";Y 
End