1. Вычислите, используя ячейку памяти: а) (12 + 34) * (56 + 78)
б) (1191 + 187) : (17 + 89)
2. Запишите числа в научном (экспоненциальном) формате:
а) 0,000000123
3. Вычислите
а) 1/2 + 1/3 + 1/4 + 1/5 + 1/6
б) (2,5 + 3,765)  (3,782 – 1,976)
в) 13,826 – (7,83 + 12,35) : 4
Уровень C.
4. Определите, сколько раз нужно
а) умножить 1 на 2, чтобы получить 65536
б) разделить 14348907 на 3, чтобы получить 1
5. Найдите число, квадрат которого равен заданному:
а) 6241
б) 974169
6. Попробуйте догадаться, что получится, если в этой сумме учесть очень много слагаемых (скажем, 1000000):
1/2 + 1/4 + 1/8 + 1/16 + 1/32 + 1/64 + 1/128 + …
ответ:

Вбейсике есть встроенная функция 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$ = ""