Массив заполнен случайным образом 20 числами в интервале от 0 до 100. 1) найти максимальный и минимальный элемент массива, а так же их сумму 2) найти среднее арифметическое элементов массива 3) из элементов массива сформировать два массива с четными и нечетными элементами (к примеру из массива а четные элементы поместить в массив в, а нечетные в массив с) вывести на экран полученные результаты (с пояснениями! )
298
445
Ответы на вопрос:
Код: 1) program mas; var i,ne,ch,n: integer; a: array [1..1000] of integer; begin read(n); randomize; for i: =1 to n do begin a[i]: =random(80)+21; write(a[i],' '); //распечатка массива, увидешь правильно ли программа выполняет функци end; for i: =1 to n do begin if a[i] mod 2=0 then ch: =ch+1 else ne: =ne+1; end; writeln; writeln('нечетные=',ne); writeln('четные=',ch); end. 2) const n = 10; var a: array [ 1 .. n ] of integer; i, znachenie, count: integer; sred_arifm, sum: real; begin for i: =1 to n do begin write('a[,'i,']='); readln(a[i]); end; write('введите значение: '); readln(znachenie); sum: =0; count: =0; for i: =1 to n do if a[i] > znachenie then begin inc(count); sum: =sum+a[i]; end; sred_arifm: =sum/count; write('среднее арифметическое =',sred_arifm: 3: 2); end.
Program n_12; var a, b: integer; s, x: real; beginwriteln ('подсчёт суммы от продажи'); writeln ('количество не проданных билетов бизнес класса a'); readln (a); writeln ('количество не проданных билетов эконом класса b'); readln (b); writeln ('стоимость билета бизнес класса'); readln (x); s : = (40-a)*x+(120-b)*x/2; writeln ('билетов продано на ', s, ' руб.'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
zenkov2000cemen04.02.2022 05:29
-
Шахлинка15.07.2021 13:12
-
tamirisis7sk07.06.2021 06:02
-
HETHEDAM14.01.2022 03:56
-
batareya66607.03.2022 09:10
-
varyavernerr09.01.2020 19:05
-
Бенди300703.12.2022 15:37
-
илья2003210115.02.2020 17:15
-
Artur202128.10.2021 17:15
-
Dima2568811.06.2021 13:27
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.