Как нарисовать сердце в кумире (робот)
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
'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