Решение задачи по написанию программы на поиск номера (индекса) максимального элемента в массиве
Написать на трех языках программирования Pascal, C++, Школьный алгоритмический язык программу по поиску номера (индекса) максимального числа в массиве из 5 элементов, Массив задается внутри программы присваиванием значения ячейке массива (пример dat[2]:=44; ---> в ячейку 2 массива dat записали значение 44)
Массив
3 | 4 | 5 | 7 | 9 |
.
Блок схема программы:
Кумир (символ | в начале строки обозначаент начало комментария, т.е. данная часть кода в алгоритме не участвет, а присутвует лишь для пояснения отдаваемых команд)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
алг нач | резервируем область памяти для массива dat цел таб dat[1:5] | резервируем область памяти для переменных i, nomx цел i,nomx dat[1]:=3; dat[2]:=4; dat[3]:=5; dat[4]:=7; dat[5]:=9; |в переменную nomx помещаем индекс первого элемента массива mx:=dat[1]; | цикл со счетчиком i для перебора всех элементов массива нц для i от 2 до 5 | если значение элемента массива больше значения, хранящегося в ячейке с номером nomx, | то в nomx помещаем индекс (номер) этого элемента если dat[i]>dat[nomx] то nomx:=i все кц вывод "индекс максимального числа массива = ", nomx кон |
.
С++ (символ // в начале строки обозначаент начало комментария, т.е. данная часть кода в алгоритме не участвет, а присутвует лишь для пояснения отдаваемых команд)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
#include <iostream> using namespace std; int main() { //резервируем область памяти для массива dat и переменных i, nomx int dat [5],i,nomx; dat[1]=3; dat[2]=4; dat[3]=5; dat[4]=7; dat[5]=9; //в переменную nomx помещаем индекс первого элемента массива nomx=1; //цикл со счетчиком i для пербора всех элементов массива for (i=2;i<=5;i++){ //если значение элемента массива больше значения, хранящегося в элементе с номером nomx, //то в nomx помещаем значения индекса (номер) элемента if (dat[i]>dat[nomx]){nomx=i;}} //вывод nomx за пределами цикла cout << "index maximalnogo chisla massiva = "<< nomx; } |
.
Pascal (символ // в начале строки обозначаент начало комментария, т.е. данная часть кода в алгоритме не участвет, а присутвует лишь для пояснения отдаваемых команд)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
//резервируем область памяти для массива dat и переменных i, nomx var dat: array [1..5] of integer; var i, nomx: integer; begin //заполняем массив числами dat[1]:=3; dat[2]:=4; dat[3]:=5; dat[4]:=7; dat[5]:=9; //в переменную nomx помещаем номер первого элемента массива nomx := 1; //цикл со счетчиком i для перебора всех элементов массива for i := 2 to 5 do //если значение элемента массива больше значения, хранящегося в mn, //то в nomx помещаем номер (индекс) этого элемента if (dat[i] < dat[nomx]) then nomx:= i; //вывод nomx за пределами цикла write('номер максимального число массива = ', nomx); end. |
Все статьи раздела
Решение задачи на переворот числаРешение задачи на поиск минимального целого числа в массиве.Решение задачи по написанию программы на поиск номера (индекса) максимального элемента в массивеРешение задачи по написанию программы на поиск номера (индекса) минимального элемента в массивеРешение задачи по написанию программы на подсчет кол-ва элементов в массиве больших некоторого значенияРешение задачи по написанию программы на подсчет кол-ва элементов в массиве меньших некоторого значенияРешение задачи по написанию программы на подсчет суммы элементов в массиве меньших некоторого значенияРешение задачи по написанию программы на подсчет суммы элементов в массиве больших некоторого значенияРешение задачи по написанию программы на подсчет суммы всех элементов в массиве Решение задачи по написанию программы на поиск максимума в массиве