DIM X(10)
RANDOMIZE TIMER
FOR I = 1 TO 10
X(I) = INT(RND(1) * 20) + 1
PRINT X(I); " ";
NEXT I
PRINT
INPUT "Введите число"; K
P = 1
FOR I = 1 TO 10
IF X(I) MOD K = 0 THEN P = P * X(I)
NEXT I
<span>IF P = 1 THEN PRINT "Кратных нет" ELSE PRINT "P ="; P</span>
Присутствуют операторы if, then, else. Значит ветвление
Ответ:б
Вот ответы! А во вторник вышла 5 за четверть! Удачи тебе в учёбе!
<u>Порядок выполнения решений:</u>
<em>1) Раскрываются скобки.</em>
<em>2) Умножения и деления.</em>
<em>3) Плюсы и минусы.</em>
1) a:=-(2+3*(10-7)) = -(2+3*3) = - 11
2) b:=(22/a)*(33/a) = (22/(- 11))*(33/(- 11)) = (-2)*(-3) = 6
3) b:=b/2 = 6/2 = 3