1) Определите назначение цифр 8 и 9 в тексте: «Казахстан официально является демократической, светской, унитарной, конституционной республикой с разнообразным культурным наследием. Местность Казахстана Включает равнины, степи, тайгу, скальные каньоны, холмы, дельты, Заснеженные горы Ігустыни. В экономике доминирует углеводородная промышленность, занятость максимальна в сфере услуг» IT a населения
Широкое применение компьютерных технологий в автоматизированных системах обработки информации и управления привело к обострению проблемы защиты информации, циркулирующей в компьютерных системах, от несанкционированного доступа. Защита информации в компьютерных системах обладает рядом специфических особенностей, связанных с тем, что информация не является жёстко связанной с носителем, может легко и быстро копироваться и передаваться по каналам связи. Известно очень большое число угроз информации, которые могут быть реализованы как со стороны внешних нарушителей, так и со стороны внутренних нарушителей.
uses Crt; const n=15; type Vec=array [1..n] of integer ; var i, SumOtr, ColOtr: integer; A: Vec ; begin ClrScr; Randomize; SumOtr:=0; ColOtr:=0; WriteLn (' Massiv A: '); for i:=1 to n do begin A[i]:=-10+random(20); if A[i]<0 then begin SumOtr:=SumOtr+A[i]; ColOtr:=ColOtr+1; end; Write (A[i]:4); end; WriteLn; WriteLn('ColOtr = ', ColOtr); WriteLn('SumOtr = ', SumOtr); WriteLn('SredOtr = ', SumOtr/ColOtr:4:2); ReadLn; end.
uses Crt;
const n=15;
type Vec=array [1..n] of integer ;
var i, SumOtr, ColOtr: integer;
A: Vec ;
begin
ClrScr;
Randomize;
SumOtr:=0;
ColOtr:=0;
WriteLn (' Massiv A: ');
for i:=1 to n do
begin
A[i]:=-10+random(20);
if A[i]<0 then
begin
SumOtr:=SumOtr+A[i];
ColOtr:=ColOtr+1;
end;
Write (A[i]:4);
end;
WriteLn;
WriteLn('ColOtr = ', ColOtr);
WriteLn('SumOtr = ', SumOtr);
WriteLn('SredOtr = ', SumOtr/ColOtr:4:2);
ReadLn;
end.