Ответы на вопрос:
Составил такую таблицу с графиком.
Старался попроще делать, вроде всё должно быть нормально (правда я делал в онлайн-версии экселя, так что если какие то будут по оформлению несхождения- уж немного поправьте в нормальном экселе).
Скрин и файл таблицы приложены внизу.
1. примерно так учат писать программы в const nn=100; // предельное кол-во элементов в массиве type mas=array[1..nn] of integer; procedure randomarray(var a: mas; n,p,q: integer); // заполняет первые n элементов массива a // случайными числами из интервала [p; q] var i: integer; begin for i: =1 to n do a[i]: =random(q-p+1)+p end; procedure printarray(a: mas; n: integer); // выводит на экран первые n элементов массива a var i: integer; begin for i: =1 to n do write(a[i],' '); writeln end; procedure sortbydescending(var a: mas; n: integer); // сортирует по невозрастанию первые n элементов массива a. // элементарная обменная сортировка var i,j,t: integer; begin for i: =1 to n-1 do for j: =1 to n-1 do if a[j]< a[j+1] then begin t: =a[j]; a[j]: =a[j+1]; a[j+1]: =t end end; // основная программа var i,n1,n2,n3,x,y: integer; a,b,c: mas; begin randomize; write('кол-во элементов в массиве и границы интервала из значений: '); read(n1,x,y); randomarray(a,n1,x,y); write('кол-во элементов в массиве и границы интервала из значений: '); read(n2,x,y); randomarray(b,n2,x,y); write('первый массив: '); printarray(a,n1); write('второй массив: '); printarray(b,n2); writeln('объединенный массив, отсортированный по невозрастанию'); n3: =n1+n2; for i: =1 to n1 do c[i]: =a[i]; for i: =1 to n2 do c[i+n1]: =b[i]; sortbydescending(c,n3); printarray(c,n3) end. тестовое решение кол-во элементов в массиве и границы интервала из значений: 8 10 60 кол-во элементов в массиве и границы интервала из значений: 6 30 90 первый массив: 41 56 14 57 52 51 30 54 второй массив: 76 36 44 39 68 38 объединенный массив, отсортированный по невозрастанию 76 68 57 56 54 52 51 44 41 39 38 36 30 14 2. на самом деле эту же можно написать гораздо короче // pascalabc.net 3.1, сборка 1246 от 23.05.2016 begin var n1,n2,x,y: integer; write('кол-во элементов в массиве и границы интервала из значений: '); read(n1,x,y); var a: =arrrandom(n1,x,y); write('кол-во элементов в массиве и границы интервала из значений: '); read(n2,x,y); var b: =arrrandom(n2,x,y); write('первый массив: '); a.println; write('второй массив: '); b.println; writeln('объединенный массив, отсортированный по невозрастанию'); var c: =(a+b).sorteddescending; c.println end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Wensansys26.06.2023 11:32
-
somov10130.03.2020 05:16
-
petukhova0510.11.2020 23:29
-
jijafhv463603.01.2020 00:24
-
KatyaKuxar27.12.2022 05:12
-
lllaasaw31.07.2020 07:43
-
emdnick24.04.2021 18:15
-
Ulya39113.11.2021 11:38
-
superdmnomber117.04.2020 08:09
-
gxd59413.09.2022 19:06
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.