{* Задача218 *}

REM basic

' Ввести А и В. Вычислить корень третьей степени из их разности и квадратные
' корни каждой переменной. Если разность или сами переменные меньше нуля, то сообщить
' об этом.


CLS
5 INPUT "A = ", a
  INPUT "B = ", b

q1 = a < 0
q2 = b < 0
q3 = (a - b) < 0
q = q1 + q2 + q3

If q  0 Then PRINT "Error": GoTo 5

SQRTa = SQR(a)
SQRTb = SQR(b)
razn = (a - b) ^ (1 / 3)

PRINT SQRTa
PRINT SQRTb
PRINT razn
End