anna0969
26.04.2022 12:42

С ++
В одномерном массиве , состоящем из 12 целых элементов :
b) Количество элементов массива , меньше заданного числа Х , введённое пользователем

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
alibekovberkut
11.02.2022 08:11

Классификация субъектов.

Можно выделить следующие виды субъектов информационного права:

— потребители (пользователи) информации, которыми согласно ст. 1 Федерального закона от 9 февраля 2009 г. № 8-ФЗ "Об обеспечении доступа к информации о деятельности государственных органов и органов местного самоуправления" являются граждане, организации, органы государства, органы местного самоуправления, общественные объединения, осуществляющие поиск информации, имеют право использовать информационные продукты в личных целях, обладают ограниченным правом на распространение информации;

— производители информации — лица, которые обладают всеми правомочиями в отношении создаваемых ими информационных продуктов;

— обладатели информации — лица, самостоятельно создавшие информацию либо получившие на основании закона или договора право разрешать или ограничивать доступ к информации (ст. 2 Федерального закона от 27 июля 2006 г. № 149-ФЗ "Об информации, информационных технологиях и о защите информации";

— информационные посредники, оказывающие информационные и иные услуги другим субъектам по отдельным договорам (операторы связи, сервис-провайдеры и др.). Среди них можно выделить традиционных информационных посредников и торговых информационных посредников [1]Торговые информационные посредники — это лица, осуществляющие посреднические информационные функции в сфере электронной торговли (торговое информационное посредничество).;

— органы надзора и контроля в сфере связи, информационных технологий и массовых коммуникаций, имеющие комплексную правосубъектность;

— юрисдикционные органы по рассмотрению информационных споров (вс органы).

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

Выделяют также основных (производитель, потребитель, обладатель информации) и вс субъектов информационного права (государственная комиссия по радиочастотам, конкурсные комиссии, судебные органы, рассматривающие информационные споры, и др.).

Модельный информационный кодекс для государств — участников СНГ устанавливает, что субъектами информационных отношений являются физические и юридические лица, лица без гражданства, общественные и политические организации, органы государственной власти и органы местного самоуправления. К субъектам также могут быть отнесены иностранные физические и юридические лица, иностранные общественные и политические организации, органы государственной власти и органы местного самоуправления иностранных государств, международные организации, иностранные государства (ст. 10).

Каждый из указанных субъектов имеет свой информационно-правовой статус на основании информационного законодательства.

0,0(0 оценок)
Ответ:
нтпрои
14.11.2020 04:41
VAR
   n, m, sum, i, j: Integer;
   a: Array [1..10000] of Array [1..10000] of Integer;
BEGIN
   Read(n, m);

   For i := 1 to n do
      For j := 1 to m do Read(a[i][j]);

   For i := 1 to n do
      For j := 1 to m do
         If (a[i][j] > 0) then sum := sum + a[i][j];

   Write(sum);
END. 

Но для экономии времени и сил можно не создавать массив:
VAR
   n, m, sum, el, i, j: Integer;
BEGIN
   Read(n, m);

   For i := 1 to n do
      For j := 1 to m do begin 
         Read(el);
         If (el > 0) then sum := sum + el;
      End;

   Write(sum);
END.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота