Ответ:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program Project1;
const n=10;
var i,sum:integer;
A:array [1..n] of integer;
begin
for i:=1 to n do begin
write('введите A[',i,']'); readln (A[i]);
end;
writeln;
sum:=0;
for i:=1 to n do
if A[i]<0 then begin
writeln ('A[',i,']'); sum:=sum+A[i];
end;
writeln ('Сумма отрицательных элементов =',sum);
end.
Объяснение:
Стас Петя и Коля -1,2,6
Миша и Петя ничего не держат, то Петя -6
Олег стоит возле Коли так как он стоит между с очками(колей) и Мишой(без очков)
то
Стас-1
Коля-2
Олег-3
Миша-4
Толя-5(он лишился)
Петя-6
Var r,v:integer;
begin
read(r,v);
if (v < r-105) then write(' < ') else
if (v > r - 95) then write(' > ') else
write(' HOPM ');
end.
Для создания рекламы приглашений и т.д
Антивірусне програмне забезпечення зазвичай використовує два різних методи для виконання своїх задач.Наприклад:Перегляд (сканування) файлів для пошуку відомих вірусів, що відповідають визначенню в словнику вірусів та знаходження підозрілої поведінки будь-якої з програм, що схожа на поведінку зараженої програми.При цьому методі антивірусна програма під час перегляду файлу звертається до словника з відомими вірусами, що складений авторами програми-антивірусу.У разі відповідності якоїсь ділянки коду програми, що проглядається, відомому коду (сигнатурі) вірусу в словнику, програма-антивірус може виконувати одну з наступних дій.<span>Хоча антивірусні програми створені на основі пошуку відповідності визначенню вірусу в словнику, за звичайних обставин, вони можуть досить ефективно перешкоджати збільшенню випадків зараження комп'ютерів, автори вірусів намагаються триматися на півкроку попереду таких програм-антивірусів, створюючи «олігоморфні», «поліморфні» і, найновіші, «метаморфічні» віруси, у яких деякі частини шифруються або спотворюються так, щоб неможливо було знайти спільне з визначенням в словнику вірусів.</span>