zadach228.BAS

{* Задача228 *}

REM basic

' Если вода приливается к кислоте, то происходит реакция с выделением тепла,
' что может стать причиной выброса смеси воды и кислоты из сосуда. Пусть сосуды
' с водой и кислотой сообщаются трубкой на высоте h мм. см. рис. 2.21.
' К уровням жидкости A и B мм в каждом из сосудов прибавляется еще dA и dB мм
' воды и кислоты. Ввести в программу значения A, B, dA, dB и определить
' пройдет ли эксперимент нормально или состоится выброс?


CLS
INPUT "Ввести в программу значения A, B, dA, dB, мм ", A, B, dA, dB
INPUT " Высота соединительной трубкиб мм ", H

If (A + dA) < H IMP (B + dB) < H Then PRINT "Нормально" Else PRINT "Выброс"

End