artem110616
10.01.2020 02:07

Vhdl код функции нахождения максимального элемента в массиве, элементами которого являются натуральные числа

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
zarya0207
04.02.2023 16:11

Объясняю: нужно найти сумму каждого участника, после чего найти максимальное значение и вывести его на экран. 

Сначала мы вводим эти самые , потом складываем. Далее Sort3(Iv,Pet,Sid) - это функция. Если вы не знакомы с функциями, то просто перерисуйте вместо этого укрупненного блока все, что на следующей странице, вместо переменных а, в и с подставляя те переменные, которые вы используете для хранения суммы участников. 

Что делает функция Sort3: он сортирует по убыванию значения, хранящиеся в переменных а,в и с. После чего для того, чтобы получить максимальное значение, нам достаточно вывести первый элемент - а. Функция Swap  выполняет обмен значений переменных. Sort2 - сортирует два элемента. Она вс для Sort3. 

В основной программе вместо переменных а,в и с использовались переменные Iv, Pet и Sid. При неиспользовании функций подставляйте их. 

Можно использовать простые развилки и не заморачиваться с Sort3, но выходит неэффективно, некрасиво.При увеличении числа участников количество развилок вырастет в несколько раз - оно вам надо? Проще отсортировать. 

 

0,0(0 оценок)
Ответ:
konovalova701
15.07.2020 14:27

В условии задачи было бы неплохо указывать размер и тип массива и язык программирования на котором необходимо сделать задание.

   

Program Masiv;

Uses Crt;

const n=15; {у нас массив будет 15 элементов и целочисленный}

 

                       {если размер и тип другие поменяй значение n и тип} 

 var a: array[1..n] of integer;

        i:integer;

begin

     clrscr; 

     write('Введите элементы массива:'); 

     for i:=1 to n do readln(a[i]);

   

 

     writeln;

     write('Исходный массив:') 

 

       for i:=1 to n do write(a[i]:3);

   

  for i:=1 to n do 

      if (a[i]<0) then a[i]:=abs(a[i]);

     writeln;

     write('Обработанный массив:') 

       for i:=1 to n do write(a[i]:3);

       readkey;

end.

 

 

 

 

 

 

 

 

 

 

  

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота