Вопрос по информатике:
НАПИСАТЬ ПРОГРАММУ ЖЕЛАТЕЛЬНО В BASIC,можно и в PASCAL
Федя пытается протолкнуть в форточку размерами X см и Y см свою голову, длина окружности которой С см. Удастся ли мальчику его эксперимент или голова застрянет?
- 25.06.2016 09:48
- Информатика
- remove_red_eye 13513
- thumb_up 40
Ответы и объяснения 1
Составим условие прохождения окружности длины С в прямоугольник со сторонами х и у. Очевидно, что диаметр окружности должен быть меньше минимальной из длин сторон.
'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
- 26.06.2016 11:01
- thumb_up 23
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.