1 - истина
0 - ложь
a=1
b=0
c=1
--------------------------
1) a*b=0
2) a+b=1
3) НЕa+b=0
4) a*b+c=1
5) a+b*c=1
6) НЕa+b*c=0
7) (a+b)*(c+b)=1
8) НЕ(a+b)*(c+b)=НЕa*НЕb*(c+b)=0
9) НЕ(a*b*c)=НЕa+НЕb+НЕc=1
Комп'ютерний вірус - вид шкідливого програмного забезпечення, здатного впроваджуватися в код інших програм, системні області пам'яті, завантажувальні сектори, а також поширювати свої копії по-різному.
Антивірусна програма - спеціалізована програма для виявлення комп'ютерних вірусів, а також небажаних програм і відновлення заражених такими програмами файлів і профілактики
бувають віруси
Віруси-маскувальники - Rootkit. ...
Віруси - шпигуни - Spyware. ...
Зомбі - Zombie. ...
Рекламні віруси - Adware. ...
антивіруси: AVG AntiVirus Free. Популярный бесплатный антивирус с простым интерфейсом. ...
Avira Free Security Suite. ...
Bitdefender Antivirus Free Edition. ...
Comodo Internet Security. ...
Avast Free Antivirus. ...
Kaspersky Free. ...
Panda Free Antivirus. ...
program
zadagha_1;
var
a:
array[1..8] of integer;
i,sum:integer;
begin
writeln('vvedite
8 chisel');
for i:=1 to
8 do read(a[i]);
sum:=0;
for i:=1 to
8 do begin
if i mod 2
<> 0 then begin
sum:=sum+a[i];
writeln(a[i]);
end;
end;
writeln();
writeln('summa
elementov c nechetnim N =', sum);
end.
program
zadagha_2;
var
b:
array[1..1000] of integer;
i,a,n:integer;
begin
writeln('vvedite
chislo - kolichestvo elementov massiva');
readln(n);
for i:=1 to
n do begin
b[i]:=random(1000);
write(b[i]:6);
end;
writeln();
writeln('vvedite
chislo');
readln(a);
write
('elementi > dannogo chisla: ');
for i:=1 to
n do begin
if
b[i]>a then write (i:4);
end;
end.
program
zadacha_3;
var
a:
array[1..100] of integer;
i,n,k:
integer;
begin
n:=random(100);
for i:=1 to
n do begin
a[i]:=random(1000)-500;
write(a[i]:6);
end;
writeln();
writeln('vvedite
chislo');
readln(k);
writeln('v
massive chisly ',k, ' kratni: ');
for i:=1 to
n do begin
if (a[i] mod k = 0) and (a[i]>0) then begin
write(a[i]:6);
end;
end;
end.
