Дан массив а(6). найти сумму и количество положительных элементов, расположенных между минимальным и максимальным элементами.
168
299
Ответы на вопрос:
Program example; const a=30; nmin: =-100; // минимальный параметр nmax: =100; //максимальный var flag_max : integer; flag_min : integer; i. jmin,jmax : integer; //счетчики randomize; array max[a]; //заполняем случайніми числами диапозон -100 +100 for i=1 do a do begin max=: = random (nmin + 1) - 2 * nmax; end; //ищим максимальный элемент for i=1 do a do begin if max> max[i+1] then begin flag_max: =max jmax: =i; end; else begin flag_max: =max[i+1]; jmax: =i; end; end; //минимальный элемент for i=1 do a do begin if max> max[i+1] then begin flag_min: =max[i+1] jmin: =i; end; else begin flag_min: =max; jmin: =i; end; end; //подсчитываем сумму for i=jmin do jmax-1 do begin max: =max[i+1] end; //сумма чисел в рандовом массиве между макс и мин єлементом write('сума',max);
Program q2; var x1,x2,x3,y1,y2,y3,a,b,c,p,s: real; begin readln(x1); readln(x2); readln(x3); readln(y1); readln(y2); readln(y3); a=sqrt((x2-x1)*(x2-x1)+(y2-y1)*(y2-y1)); b=sqrt((x3-x2)*(x3-x2)+(y3-y2)*(y3-y2)); c=sqrt((x1-x3)*(x1-x3)+(y1-y3)*(y1-y3)); p=a+b+c; s=sqrt((0,5*p)*(0,5*p-a)*(0,5*p-b)*(0,5*p-c)); writeln(p); writeln(s); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
tarasIT24.04.2021 02:28
-
fserwq14.06.2021 04:18
-
kogoch13.03.2021 11:16
-
amina32023.02.2020 07:18
-
smaiershow07.01.2020 23:09
-
Vee1916.04.2021 19:51
-
kulaevasvetlan17.08.2020 18:29
-
A1mSh1k03.10.2021 14:47
-
aresubject170125.02.2020 20:48
-
feeedf04.03.2022 07:10
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.