Pascal. процедуры. вычислить , где s1 и k1 – сумма и количество положительных элементов массива x(n); s2 и k2 – сумма и количество положительных элементов массива y(m) m ≤50 n ≤50

102

140

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

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

ната1187

Информатика

4,7(85 оценок)

Type mas = array [1..50] of integer; var x,y : mas; s1,k1,s2,k2 : integer; s,k : integer; //если вещественные, а не целые заменить на real(integer) procedure ma (var x,y : mas); var i : integer; begin for i : = 1 to 50 do begin x[i] : = random(50); y[i]: =random(75); end; end; procedure sk (var s,k : integer; a : mas); var i : integer; begin s : = 0; k : = 0; for i : = 1 to 50 do if a[i] > 0 then begin s : = s + a[i]; k : = k +1; end; end; begin randomize; ma(x,y); sk (s,k,x); s1 : = s; k1 : = k; sk (s,k,y); s2 : = s; k2 : = k; //вывод по желанию end.

TOFeFE

Информатика

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

Понятие мультимедиа, вообще, и средств мультимедиа, в частности, с одной стороны тесно связано с компьютерной обработкой и представлением разнотипной информации и, с другой стороны, лежит в основе функционирования средств ИКТ, существенно влияющих на эффективность общего среднего образования

Объяснение:

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

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

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

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

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

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

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

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

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

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