1) Program Massiv1;
Uses Crt;
var k:array[1..12] of real;
i,c:integer;
begin
clrscr;
write('Введите элементы массива k:');
c:=0;
for i:=1 to 12 do
begin
readln(k[i]);
if (k[i]<0) then Inc(c);
end;
writeln;
writeln;
for i:=1 to 12 do write(k[i]:4:4);
writeln;
writeln('Количество элементов <0:',c);
readkey;
end.
2) Program Massiv2;
Uses Crt;
var m:array[1..10] of integer;
i,c:integer;
begin
clrscr;
write('Введите элементы массива m:');
c:=0;
for i:=1 to 10 do
begin
readln(m[i]);
if (m[i]=3) then Inc(c);
end;
writeln;
writeln;
for i:=1 to 12 do write(m[i]:4);
writeln;
writeln('Количество элементов =3:',c);
readkey;
end.
В третьем задании видимо имеется ввиду номер элемента этого массива, т.к по условию задачи массив у нас один.
3) Program Massiv3;
Uses Crt;
var m:array[1..8] of integer;
i,c,max:integer;
begin
clrscr;
write('Введите элементы массива m:');
c:=0;
for i:=1 to 8 do readln(m[i]);
writeln;
writeln;
max:=m[1]
for i:=1 to 8 do
begin
if (m[i]>max) then
begin
max:=m[i];
c:=i
end;
write(m[i]:4);
end;
writeln('Индекс максимального элемента =:',c);
readkey;
end.
4) Program Massiv4;
Uses Crt;
var m:array[1..12] of integer;
i,c,max,sum:integer;
begin
clrscr;
write('Введите элементы массива m:');
c:=0; sum:=0;
for i:=1 to 12 do readln(m[i]);
writeln;
writeln;
max:=m[1]
for i:=1 to 12 do
begin
if (m[i]>max) then
begin
max:=m[i];
c:=i
end;
write(m[i]:4);
end;
for i:=1 to c-1 do sum:=sum+m[i];
writeln('Количество элементов расположенных до max :',с-1);
writeln('Сумма элементов расположенных до max :',sum);
readkey;
end.
В пятом задании видимо имеется ввиду значения элементов массива меньшие чем сумма первого и последнего
5) Program Massiv5;
Uses Crt;
var k:array[1..15] of real;
sum:real;
i,c:integer;
begin
clrscr;
write('Введите элементы массива k:');
c:=0;
for i:=1 to 15 do readln(k[i]);
sum:=k[1]+k[15];
writeln;
writeln;
for i:=1 to 15 do
begin
write(k[i]:4:4);
if (k[i]<sum) tnen Inc(c);
end;
writeln;
writeln('Количество элементов :',c);
readkey;
end.
Классификация субъектов.
Можно выделить следующие виды субъектов информационного права:
— потребители (пользователи) информации, которыми согласно ст. 1 Федерального закона от 9 февраля 2009 г. № 8-ФЗ "Об обеспечении доступа к информации о деятельности государственных органов и органов местного самоуправления" являются граждане, организации, органы государства, органы местного самоуправления, общественные объединения, осуществляющие поиск информации, имеют право использовать информационные продукты в личных целях, обладают ограниченным правом на распространение информации;
— производители информации — лица, которые обладают всеми правомочиями в отношении создаваемых ими информационных продуктов;
— обладатели информации — лица, самостоятельно создавшие информацию либо получившие на основании закона или договора право разрешать или ограничивать доступ к информации (ст. 2 Федерального закона от 27 июля 2006 г. № 149-ФЗ "Об информации, информационных технологиях и о защите информации";
— информационные посредники, оказывающие информационные и иные услуги другим субъектам по отдельным договорам (операторы связи, сервис-провайдеры и др.). Среди них можно выделить традиционных информационных посредников и торговых информационных посредников [1]Торговые информационные посредники — это лица, осуществляющие посреднические информационные функции в сфере электронной торговли (торговое информационное посредничество).;
— органы надзора и контроля в сфере связи, информационных технологий и массовых коммуникаций, имеющие комплексную правосубъектность;
— юрисдикционные органы по рассмотрению информационных споров (вс органы).
Субъектов информационного права можно разделить на индивидуальных (физические лица) и коллективных (юридические лица). К индивидуальным относятся граждане, иностранцы, лица без гражданства, лица с двойным гражданством. Коллективные субъекты информационного права делятся на следующие виды: само государство; государственные органы и учреждения; общественные объединения; промышленные предприятия; иностранные фирмы; компании, банки. При этом не всякий коллектив может выступать субъектом права. Например, семья или кафедры, отделы и другие общности не обладают этим качеством. Субъектами информационного права являются устойчивые, постоянные образования, которые характеризуются единством воли и цели, а также определенной внутренней организацией, но не случайные и не временные объединения граждан.
Выделяют также основных (производитель, потребитель, обладатель информации) и вс субъектов информационного права (государственная комиссия по радиочастотам, конкурсные комиссии, судебные органы, рассматривающие информационные споры, и др.).
Модельный информационный кодекс для государств — участников СНГ устанавливает, что субъектами информационных отношений являются физические и юридические лица, лица без гражданства, общественные и политические организации, органы государственной власти и органы местного самоуправления. К субъектам также могут быть отнесены иностранные физические и юридические лица, иностранные общественные и политические организации, органы государственной власти и органы местного самоуправления иностранных государств, международные организации, иностранные государства (ст. 10).
Каждый из указанных субъектов имеет свой информационно-правовой статус на основании информационного законодательства.