НАПИСАТЬ ПРОГРАММУ ЖЕЛАТЕЛЬНО В BASIC,можно и в PASCAL
Федя пытается протолкнуть в форточку размерами X см и Y см свою голову, длина окружности которой С см. Удастся ли мальчику его эксперимент или голова застрянет?

Составим условие прохождения окружности длины С в прямоугольник со сторонами х и у.  Очевидно, что диаметр окружности должен быть меньше минимальной из длин сторон.
\displaystyle min(x,y) \ \textgreater \  \ C; \ C=\pi d \to d= \frac{C}{\pi}; \quad min(x,y) \ \textgreater \   \frac{C}{\pi}

'MS Qbasic 1.0
INPUT "x,y=", x, y
INPUT "C=", C
pi = 4 * ATN(1)
IF x < y THEN
   min = x
ELSE
   min = y
END IF
IF min > C / pi THEN
   PRINT "YES!!!"
ELSE
   PRINT "No"
END IF

Оцени ответ
Не устраивает ответ?

Если твой вопрос не раскрыт полностью, то попробуй воспользоваться поиском на сайте и найти другие ответы по предмету Информатика.

Найти другие ответы

Загрузить картинку