Составить программу определения типов углов альфа, бета, гамма (прямой, тупой, острый), лежащих против этих сторон — Basic(Бейсик)

Дан треугольник со сторонами a, b, c.

INPUT "vvedite storony treugolnika ", a, b, c
m = (  b ^ 2 + c ^ 2 -a ^ 2) / (2 * b * c)
PRINT "ugol alfa ";
IF m < .000001 THEN PRINT "pryamoy" ELSE IF m < 0 THEN PRINT "tupoy" ELSE PRINT "ostryj"
m = ( a ^ 2 + c ^ 2-b ^ 2 ) / (2 * a * c)
PRINT "ugol beta ";
IF m < .000001 THEN PRINT "pryamoy" ELSE IF m < 0 THEN PRINT "tupoy" ELSE PRINT "ostryj"
m = ( a ^ 2 + b ^ 2-c ^ 2 ) / (2 * a * b)
PRINT "ugol gamma ";
IF m < .000001 THEN PRINT "pryamoy" ELSE IF m < 0 THEN PRINT "tupoy" ELSE PRINT "ostryj"

Leave a Comment