1 2 3 4 | CLSINPUT "Vvedite diametr : ", DINPUT "Vvedite shirinu : ", SIF SQR(S*S+S*S) <= D THEN PRINT "Da!" ELSE PRINT "Net!" |
Теорема пифагора. Квадрат гипотенузы равен сумме квадратов катетов. Гипотенуза в данном случае и должна быть меньше или равна диаметру чтобы вырезать брус
Тестирование выполнено в программе QB64 ( Скачать )