zadach225.BAS

{* Задача225 *}

REM basic

' Заданы площади квадрата S1 и круга S2. Определите, поместится ли круг
' в квадрате. Решите задачу при
' 1) S1 = 2.5, S2 = 2;
' 2) S1 = 8, S2 = 5.


CLS
S1 = 2.5
S2 = 2
Pi = 3.14
s = SQR(S1)
D = 2 * SQR(S2 / Pi)
If s >= D Then PRINT "Поместится" Else PRINT "Нет"
End