2 е) 87 % від числа –31,3:2,15 + 9,152. (-3,76).
Створіть електронну таблицю за зразком
(мал. 3.39), уведіть записані вами формули,
обчисліть результати і запишіть їх у зошит.
Збережіть електронну книгу у вашій папці
у файлі з іменем завдання 3.3.3.xlsx.
DECLARE SUB KM30 (A%(), k)
DIM A%(N), B%(N)
CLS
RANDOMIZE TIMER
PRINT "A("; N; "): ";
FOR i = 1 TO N
A%(i) = RND * N
PRINT A%(i);
NEXT i
PRINT
CALL KM30(A%(), k)
PRINT "B("; N; "): ";
FOR i = 1 TO N
B%(i) = RND * N
PRINT B%(i);
NEXT i
CALL KM30(B%(), k2)
IF k > k2 THEN
Z = 1
ELSE
Z = 0
END IF
PRINT , "Z = "; Z
END
SUB KM30 (A%(), k)
FOR i = 1 TO N
IF A%(i) MOD 3 = 0 THEN
k = k + 1
END IF
NEXT i
END SUB
Пример работы программы:
A( 15 ): 0 3 0 14 10 15 8 14 3 8 6 11 11 15 6
B( 15 ): 1 1 1 5 3 5 10 6 3 9 14 8 5 14 2
Z = 1