Const
<span>n=10; </span>
<span>var a:array[1..n] of integer; </span>
<span>s,p,k,i:integer; </span>
<span>begin </span>
<span>s:=0; </span>
<span>p:=1; </span>
<span>randomize; </span>
<span>for i:=1 to n do begin </span>
<span>a[i]:=Random(100); </span>
<span>if (a[i]>0) and (a[i] mod 3 =0) then k:=k+1; </span>
<span>p:=p*a[i]; </span>
<span>s:=s+a[i]; </span>
<span>write(a[i], ' ') </span>
<span>end; </span>
<span>writeln('Сумма = ',s); </span>
<span>writeln('Произведение = ',p); </span>
<span>writeln('Количество положительных и кратных 3-м = ',k); </span>
<span>end.</span>
1. x=2 y=5 t=5
2. a=3 b=3
3. a=4683 b=4680
4. b=189 a=71
5. b=17 a=9
6. b=19 a=11
7. b=14 a=7
100 в двоичной системе счисления это 4
0-0
1-1
10-2
11-3
100-4
14 в восьмиричной это 12
от 0 до 7 аналогично 10-ти Рино системе
10-8
11-9
12-10
13-11
14-12
результатом сложения будет 16
Ответ 16