1)вычислить среднее арифметическое массива. 2)определить количество четных элементов. 3)вычислить сумму элементов с нечетными номерами.

program a1; uses crt; const n=8; var a: array[1..n] of integer; ch,s: integer; sr: real; i: byte; beginwriteln('массив'); for i: =1 to n dobegin a[i]: =random(101)-50; writeln(a[i]); end; for i: =1 to n dos: =s+a[i]; sr: =s/n; for i: =1 to n doif a[i] mod 2 = 0 then ch: =ch+1; s: =0; for i: =1 to n doif i mod 2 < > 0 then s: =s+a[i]; writeln('ответы'); writeln('1) среднее значение элементов массива = ', sr); writeln('2) количество чётных элементов = ', ch); writeln('3) сумма элементов массива с нечётными номерами = ', s); end.

1)

const nn=50; vara: array [1..nn] of integer; i,n: integer; s: real; begin  write('введите количество элементов массива: ');   readln(n);   s: =0;   for i: = 1 to n do  begin      readln(a[i]);       s: =s+a[i];   end;   writeln('среднее арифметическое массива = ',s/n)  end.

 

2)

const nn=50; vara: array [1..nn] of integer; i,n: integer; s: real; begin  write('введите количество элементов массива: ');   readln(n);   s: =0;   for i: = 1 to n do  begin      readln(a[i]);       if a[i] mod 2 =0 then s: =s+1;   end;   writeln('количество четных элементов = ',s)  end.

 

3)

const nn=50; vara: array [1..nn] of integer; i,n: integer; s: real; begin  write('введите количество элементов массива: ');   readln(n);   s: =0;   for i: = 1 to n do  begin      readln(a[i]);       if i mod 2 =1 then s: =s+a[i];   end;   writeln('cумма элементов с нечетными номерами = ',s)  end.

Берите loic и ломайте, defense.gov. Еще команда - ping defense.gov -n 9999. Это вариант с DDoS атакой. Таким образом, парочка серваков выйдет из строя. Избранные могут еще увеличить количество потоков, а в сообщение написать что-то типа "Я смотрю аниме", " this is Спарта" и т. п. в зависимости от вашей фантазии.

Вариант на JS: открываете консоль и пишите туда, что сайт начал выполнять тяжелые скрипты. К примеру с Пентагоном - чтобы регистрировал чертову дюжину "Вася228" в морские котики. Тогда сервак просто сойдет с ума. Ломайте с разных IP адресов со скоростью 1 запрос в минуту, чтобы не получить "бан" - когда сервер перестанет обрабатывать ваши запросы. А если вы хотите сломать данные - то никак не получится, только поехать в США, зайти в серверную и там подключиться. Так как система изолирована. А шифрование ломается несложно, вы же умеете вскрывать rar?

Можете конечно еще поискать через Tor, там больше инфы по поводу взлома.

Но есть простой вариант - прикинься американским программистом и тебе отдадут пароли от всего. Только не забудь прислать их в Россию (Путину)

Информативность сообщения это: область  взаимодействия  между  человеком ,  воспринимающимтекст ,  и  информационной  насыщенностью  текста ,  обусловленная  избирательной  способностью  воспринимающего  человека ,  т.е .  пределом  различимости .  для  различимости ,  т.е .  понимания  смысла  высказывания ,  переводчику  необходимо  применить  весь  предыдущий  опыт  или  знание  обстановки  общения  именно  к  данному  языковому  содержанию .  информативность  сообщения  основывается  на  следующихтребованиях:   (1 )  синтаксических ,  согласно  которым  смысл  должен  быть  логически  вводим  из  наблюдаемого  соотношения  языковых  единиц .  это  означает ,  что  переводчик  должен  установить  принадлежность  исходного  текста  к  определенной  знаковой  системе  по  характеру  отношений  между  знаками,составляющими  текст; (2 )  семантических ,  согласно  которым  смысл ,  выводимый  из  данного  соотношения  языковых  единиц ,  отражает  то  или  иное  состояние  реальной  действительности ,  включая  вымысел .  это  означает ,  что  переводчик  должен  соотнести  языковое  содержание  данного  текста  со  смыслом   (отражение  реальной  или  вымышленной  ситуации); (3 )  прагматических ,  согласно  которым  в  смысл ,  придаваемый  тексту ,  включается  оценка  как  отраженной  действительности ,  так  и  способа  ее  отражения .  это  означает,что  переводчик  должен  дать  оценку ,  близкую  к  авторской  или  соответствующую  непосредственным    перевода .