1. задайте массив из 10 элементов с датчика целых случайных чисел. найдите сумму четных элементов массива. выведите на экран исходный массив и полученную сумму. 2. дан массив в(n). определите произведение элементов, кратных 3. выведите на экран исходный массив и найденное произведение.

185

306

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

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

lolipop101

Информатика

4,6(51 оценок)

1. const n = 10; var i,s: integer; m: array [1..n] of integer; begin randomize; s: =0; for i: =1 to n do begin m[i]: = random(201)-100; writeln(m[i]); end; for i: =1 to n do if m[i] mod 2 = 0 then s: =s+m[i]; writeln('summa = ',s); readln; end. 2. const n = 100; var i,p: integer; b: array [1..n] of integer; begin randomize; p: =0; for i: =1 to n do begin b[i]: = random(201)-100; writeln(b[i]); end; for i: =1 to n do if b[i] mod 3 = 0 then p: =p*b[i]; writeln('proiz = ',p); readln; end.

moni9

Информатика

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

// pascalabc.netvart,mint: real; i: integer; beginmint: =1000; // вводим абсурдное значение что бы позже mint изменилось на 1 значение twriteln('введите t за 15 дней через пробел.'); for i: =1 to 15 do beginread(t); if t < mint thenmint: =t; end; writeln('минимальная t: ', mint); end..

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

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

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

Популярно: Информатика

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

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

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

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

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

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