Дан массив целых чисел, состоящий из 25 элементов. Подсчитать сумму элементов массива, произведение положительных

274

304

Посмотреть ответы 2

Ответы на вопрос:

BOSS653

Другие предметы

4,5(26 оценок)

USES Crt;
VAR
   A:ARRAY[0..25] OF INTEGER;
   I: BYTE;   S,K: INTEGER;   P: REAL;
BEGIN
   ClrScr; Randomize;
   { Заполнение массива случайными числами }
   WriteLn(' Значения элементов массива');
   FOR I:=1 TO 25 DO Begin
     A[I]:=Random(10)-3;   Write(A[I]:3);
   End;   WriteLn;
   S:=0; K:=0; P:=1;
   FOR I:=1 TO 25 DO Begin
     S:=S+A[I]; { сумма элементов массива }
     IF A[I]>0 THEN P:=P*A[I]; { произведение положительных элементов массива }
     IF A[I]=0 THEN K:=K+1; { количество нулевых элементов массива }
   End;
   WriteLn(' Сумма элементов массива = ',S);
   WriteLn(' Произведение положительных элементов массива = ',P:0:0);
   WriteLn(' Количество нулевых элементов массива = ',K);
END.

Максим555111

Другие предметы

4,4(97 оценок)

Олимпиа́да — крупнейшие международные комплексные спортивные соревнования, которые проводятся каждые четыре года. Традиция, существовавшая в Древней Греции, была возрождена в конце XIX века французским общественным деятелем Пьером де Кубертеном. Олимпийские игры, известные также как Летние Олимпийские игры, проводились каждые четыре года, начиная с 1896, за исключением лет, пришедшихся на мировые войны. В 1924 году были учреждены Зимние Олимпийские игры, которые первоначально проводились в тот же год, что и летние. Однако начиная с 1994 года, время проведения зимних Олимпийских игр сдвинуто на два года относительно времени проведения летних игр.

В тех же местах проведения Олимпиад спустя некоторое время проводятся Паралимпийские игры для инвалидов и других людей с ограниченными возможностями. Аналогом Олимпиад являются также летние, зимние и весенние Юношеские Олимпийские игры и студенческие Универсиады.

Олимпийская идея и после запрета античных состязаний не исчезла насовсем. Например, в Англии в течение XVII века неоднократно проводились «олимпийские» соревнования и состязания. Позже похожие соревнования организовывались во Франции и Греции. Тем не менее, это были небольшие мероприятия, носившие, в лучшем случае, региональный характер. Первыми настоящими предшественниками современных Олимпийских игр являются «Олимпии» , которые проводились регулярно в период 1859—1888 годов. Идея возрождения Олимпийских игр в Греции принадлежала поэту Панайотису Суцосу, воплотил её в жизнь общественный деятель Евангелис Заппас.

В 1766, в результате археологических раскопок в Олимпии, были обнаружены спортивные и храмовые сооружения. В 1875 археологические исследования и раскопки продолжились под немецким руководством. В то время в Европе были в моде романтическо-идеалистические представления об античности. Желание возродить олимпийское мышление и культуру рас довольно быстро по всей Европе. Французский барон Пьер де Кубертен (фр. Pierre de Coubertin), осмысливая впоследствии вклад Франции, сказал: «Германия раскопала то, что осталось от древней Олимпии. Почему Франция не может восстановить старое величие?» .

По мнению Кубертена, именно слабое физическое состояние французских солдат стало одной из причин поражения французов в Франко-прусской войне 1870—1871. Он стремился изменить положение с улучшения физической культуры французов. Одновременно с этим, он хотел преодолеть национальный эгоизм и сделать вклад в борьбу за мир и международное взаимопонимание. «Молодежь мира» должна была мериться силами в спортивных состязаниях, а не на полях битв. Возрождение Олимпийских игр казалось в его глазах лучшим решением, чтобы достичь обеих целей.

На конгрессе, проведённом 16-23 июня 1894 года в Сорбонне (Парижский университет) , он представил свои мысли и идеи международной публике. В последний день конгресса было принято решение о том, что первые Олимпийские Игры современности должны состояться в 1896 году в Афинах, в стране-родоначальнице Игр — Греции. Чтобы организовать проведение Игр, был основан Международный олимпийский комитет (МОК) . Первым президентом Комитета стал грек Деметриус Викелас, который был президентом до окончания I Олимпийских Игр 1896 года. Генеральным секретарём стал барон Пьер де Кубертен.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Другие предметы

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.