Вычислить h=sa-sb где sa иsb суммы положительных элементов массивов а и в. вычесления суммы оформить процедурой и функцией

228

356

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

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

natalijasovap08pz3

Информатика

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

// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! procedure psumpos(m: array of integer; var r: integer); begin r: =m.where(t-> t> 0).sum end; function fsumpos(m: array of integer): =m.where(t-> t> 0).sum; begin var a: =arrrandom(readinteger('n=',50); a.println; var b: =arrrandom(readinteger('n=',50); b.println; write('сумма положительных элементов а: '); var s: integer; psumpos(a,s); writeln(s); writeln('сумма положительных элементов b: ',fsumpos(b)); end. пример n= 13 48 39 -37 -28 45 -29 18 7 -23 47 -38 -34 12 n= 14 8 -3 32 -39 11 2 -30 -9 10 43 -43 41 -34 -25 сумма положительных элементов а: 216 сумма положительных элементов b: 147

Dec3mber

Информатика

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

program raf105;

var a,b,c,d,e: integer;

begin

write('введите 5 оценок через пробел: ');

readln(a,b,c,d,e);

a: =(a+b+c+d+e) div 5;

writeln('средний : ',a);

end.

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

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

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

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

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

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

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

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

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

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