1) var n,i,p:longint;a:array[1..100]of longint; begin read(n);p:=1; for i:=1 to n do read(a[i]); for i:=1 to n do if a[i] mod 3=0 then p:=p*a[i]; writeln(p); end. 2) var n,i,s,p:longint;a:array[1..100]of longint; begin read(n); p:=1;s:=0; for i:=1 to n do read(a[i]); for i:=1 to n do if a[i]>0 then s:=s+a[i]; for i:=1 to n do if a[i]<0 then p:=p*a[i]; if p>s then writeln('proizvedenie') else if p<s then writeln('summa') else writeln('ravni'); end. 3) var n,f,i,o:longint;a:array[1..100]of longint; begin read(n);f:=0; for i:=1 to n do read(a[i]); for i:=n downto 1 do begin if a[i]<0 then f:=f+1; if f=2 then begin o:=a[i];break;end; end; writeln(o); end.
При измерении объемов информации есть определенные нюансы отличающие это измерение от привычных литров и килограммов. Так, чтобы зашифровать символ в популярной кодировке потребуется 8 сигналов (каждый из которых 1 или 0). Отдельно один этот сигнал будет называться бит. А одна такая последовательность, кодирующая один символ будет называться байт. Значит в 1 байте содержится 8 бит. Далее в каждой большей единице содержится 1024 меньшие единицы. Так, в 1 кб содержится 1024 байт= 8192 бит в 1 мб содержится 1024 кб = 1048576 байт = 8388608 бит в 1 гб содержится 1024 мб = 1048576 кб = 1073741824 байт = 8589934592 бит
1. Б
2. Д
3. А
4. А
5. Б
6. А
7. Д
8. Б
9. А
10. Не понял вопрос
11. Д
12. Д
13. Д
14. Д
Уточнение:
А, это какой класс?