Var
a:array[1..6]of integer;
i,j,max:integer;
function mx(a,b:integer):integer;
begin
if a>b then result:=a else result:=b;
end;
begin
for i:=1 to 6 do
begin
a[i]:=random(20);
write(a[i]:4);
end;
writeln;
max:=a[1];
for i:=1 to 6 do
for j:=i+1 to 6 do
if mx(a[i],a[j])>max then max:=mx(a[i],a[j]);
writeln('max=',max);
<span>end.</span>
Ну если в кратце, то это:
<span>Построения политики информационной безопасности.
Здесь следует рассматривать такие аспекты, как:
1. Защиту объектов информационной безопасности - это сервера, базы данных и электронная почта т.п.
2. Защита процессов, процедур и программ обработки информации - это защита сети предприятия, защита каналов передачи данных, защита систем управления базами данных и т.п.
3. </span>Подавление побочных электромагнитных излучений - с целью не допускания обрыва связи и искажения передаваемых данных;
4. Ну и непосредственно организация управления системой защиты - установка, контроль, профилактика и т.п.
Гигабайт??
8 бит = 1 байт
1024 байт = 1 килобайт
1024 килобайт = 1 мегабайт
1024 мегабайт = 1 гигабайт
143-2=141
141/2=70.5=70
270
270+2=272
2722
2722.5
2722.52