Вопрос пользователя:
1) Даны круг и квадрат. Составьте программу, определяющую по введенным вами значениями длин стороны квадрата и радиус круга, одно из утверждений ” Квадрат вписан в круг “
Илюха отвечает:
Квадрат вписан в круг при условии что R*2(диаметр)>Диагонали квадрата
На QBasic
? "Введите 2 числа – радиус круга и сторону квадрата соответсвенно"
INPUT A;B
C=A*2 Диаметр
G=SQR(A*A+A*A) Диагональ
IF C>G THEN 1 ELSE 2
1 ? "Квадрат вписан в круг"
GOTO 3
2 ? "Квадрат не вписан в круг"
3 END