Имеется два сообщения. одно записано с символьного алфавита с содержит 20 символов, другое с символьного и содержит 10 символов определению информационный объем какого сообщения меньше?
258
449
Ответы на вопрос:
Вбейсике есть встроенная функция 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$ = ""
Популярно: Информатика
-
Rozia224421.05.2020 15:13
-
viktoria220604.06.2020 22:52
-
KroJlick2017807.02.2023 04:09
-
Angelina0711119.04.2021 17:22
-
liza132929.01.2020 00:16
-
Аранида09.12.2020 01:05
-
goroskopy16.09.2021 12:04
-
Некий200607.01.2023 16:44
-
никич4304.12.2021 18:02
-
gimnastikgirla12.04.2020 04:10