Скажите как придумать дивиз на тему информатике прошу скажите

Информатика важна, потому что всем нужна.  и юристу и врачу, и статисту и ткачу.

Чтобы уметь всё решать нужно информатиками стать

Вбейсике есть встроенная функция atn - арктангенс,поэтому угол можно в градусах посчитать.dim a, b, c, cs, cst, ang, piinput " a = ", ainput " b = ", binput " c = ", cprintpi = 3.141593cs = (b * b + c * c - a * a) / (2 * b * c)cst = csif cs < 0 then cst = sqr(1 - cs * cs)ang = atn(sqr(1 - cst * cst) / cst) * 360 / (2 * pi)if cs < 0 then ang = ang + 90print "угол a = ",print using "###.##"; angcs = (a * a + c * c - b * b) / (2 * a * c)cst = csif cs < 0 then cst = sqr(1 - cs * cs)ang = atn(sqr(1 - cst * cst) / cst) * 360 / (2 * pi)if cs < 0 then ang = ang + 90print "угол b = ",print using "###.##"; angcs = (a * a + b * b - c * c) / (2 * a * b)cst = csif cs < 0 then cst = sqr(1 - cs * cs)ang = atn(sqr(1 - cst * cst) / cst) * 360 / (2 * pi)if cs < 0 then ang = ang + 90print "угол c = ",print using "###.##"; angprint "выход - любая клавиша "doloop while inkey$ = ""