706

DEF fnc (l, a, b) = 2 * 3.14 * 8.85E-12 * l / LOG(b /) fc1 = fnc(l1, a1, b)

fc2 = fnc(l2, a2, b2)fc3 = fnc(l3, a3, b)

q = fc1 * fc2 * fc3 / (fc2 * fc3 + fc1 * fc3 + fc1 * fc)

PRINT "p . p c1="; fc1, "c2="; fc2, "c3="; fc3, " c="; q

 

8. - : 1) y = sin x + 2cos x; 2) y = sin4 x + cos4 x; 3) .

CLS

SCREEN 8

a = 320: b = 100: pi = 3.141592

FOR x = 0 TO 15

LINE (40 * x, 0)-(40 * x, 190), 2

NEXT x

FOR y = 0 TO 10

LINE (0, 20 * y)-(620, 20 * y), 2

NEXT y

LINE (a, 0)-(a, 190), 4

LINE (0, b)-(620, b), 4

FOR x = 40 * (-pi) TO 40 * pi

PSET (a + x, b - 20 * SIN(x / 40) - 40 * COS(x / 40)), 11

NEXT x

FOR x = -20 * pi TO 20 * pi

PSET (a + x, b - 20 * SIN(x / 40) ^ 4 - 20 * COS(x / 40) ^ 4), 14

NEXT x

FOR x = -160 TO 160

PSET (a + x, b - 20 * SQR(EXP(x / 40) + 1)), 5

NEXT x

END

ՠ 40 : 1, Y 20 : 1.

 

9. Z 堠 .

 

DECLARE FUNCTION ks! (x!(), n!)

INPUT n

DIM a(n), b(n), c(n)

FOR i = 1 TO n

INPUT a(i), b(i), c(i)

 



:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
 
 
 
 
 
 

Warning: in_array() expects parameter 2 to be array, null given in /home/p198609/www/bestlogistics.ru/2f41c03c6df35aa46f8d897a4eed7d02/sape.php on line 192