«аочное дистанционное образование с получением государственного диплома через Internet










ѕолучить информацию о поступлении
 
√лавна€ Ќовости  арта сайта ‘отоальбом √остева€ книга  онтакты

 

”пражнение 2 (ƒвумерные массивы)

ƒана матрица Nхћ, состо€ща€ из натуральных чисел. Ќайти в строках самые правые наименьшие элементы и определить их местоположение.

ƒл€ решени€ этой задачи просмотр каждой строки нужно организовать справа налево, чтобы сразу определить самый правый минимальный элемент.

PROGRAM PG5_2;

//описываем константу (дл€ определени€ размерности матрицы в разделе описани€ переменных)

CONST T = 100;

S = 100;

//описываем переменные

VAR A : ARRAY[1..T, 1..S] OF INTEGER;

N, M, JM, I, J, MIN : INTEGER;

BEGIN

//вводим размерность матрицы Ц количество строк и столбцов

WRITE('¬¬≈ƒ»“≈  ќЋ»„≈—“¬ќ —“–ќ  N = ');

READLN(N);

WRITE ('¬¬≈ƒ»“≈  ќЋ»„≈—“¬ќ —“ќЋЅ÷ќ¬ ћ = ');

READLN(M);

//организовываем цикл дл€ ввода элементов матрицы размерностью Nхћ

FOR I := 1 “ќ N DO

BEGIN

WRITELN('¬¬≈ƒ»TE ', M,' „»—≈Ћ');

FOR J := 1 TO M DO

READ(A[I, J])

END;

//организовываем цикл дл€ поиска в строках самых правых наименьших элементов

FOR I := 1 TO N DO

BEGIN

MIN := A[l, M];

JM := M;

FOR J := M DOWNTO 1 DO

//проверка услови€, если минимальный элемент больше текущего, то запоминаем столбце, в котором он находитс€ и переменной MIN присваиваем новое значение минимального элемента в строке

IF MIN>A[I, J] THEN

BEGIN

JM := J;

MIN := A[l, J]

END;

//вывод минимального элемента

WRITELN('B —“–ќ ≈ I =', I, '—јћџ… ѕ–ј¬џ… MIN =', MIN);

//вывод номер столбца, где находитс€ самый правый минимальный элемент строки

WRITELN('—“ќЋЅ≈÷ ћ»Ќ»ћјЋ№Ќќ√ќ ЁЋ≈ћ≈Ќ“ј ', JM)

END;

END.

ƒл€ решени€ задачи:

- формируем тело программы и описываем переменные (переменные описываютс€ в разделе описани€ переменных, который начинаетс€ с ключевого слова var) Ц указываем имена переменных и их тип;

- вводим размеры массива ј (матрицы), дл€ чего используем процедуру READLN и значени€ его элементов (значени€ элементов вводим с помощью цикла с параметром Ц вложенного цикла);

- просматриваем строки двумерного массива справа налево, ищем минимальное значение и запоминаем значение индексов (номер строки и номер столбца);

- дл€ каждой строки выводим значение и местоположение самого правого минимального элемента двумерного массива Ц используем дл€ вывода процедуру WRITELN.

ѕеременные:

ј - двумерный массив (элементы массива Ц это числа целого типа данных, размерность массива равна TхS, где T и S Ц это константы, значени€ которых равны 100);

N, ћ - количество строк и столбцов массива (размерность матрицы);

I, J - переменные цикла (счетчики);

JM - столбец минимального элемента;

MIN - текущий минимальный элемент двумерного массива.


”знать как сэкономить в кризис моно на сайте ekonom-it.ru

”пражнение 1 (ќдномерные массивы) ”пражнение 2 (ќдномерные массивы) ”пражнение 3 (ќдномерные массивы) «адачи на тему "ƒвумерные массивы" ”пражнение 1 (ƒвумерные массивы) ”пражнение 1, второй способ решени€ (ƒвумерные массивы) ≈√Ё по информатике “еоретический материал ѕрактический материал »змерение графической информации 


 
     
   
 


ѕриглашаем прин€ть участие в круглом столе!
подробнее   >>>
 

»нститут ћенеджмента, Ёкономики и »нноваций начинает набор на курсы повышени€ квалификации!
подробнее   >>>
 

”важемые студенты јЌќ ¬ѕќ »ћЁи»!
подробнее   >>>
 

Ќачинаетс€ набор на курсы повышени€ квалификации!
подробнее   >>>
 

ѕриглашаем прин€ть участие в конференци€х!
подробнее   >>>
 


все новости...

 


–ассылки Subscribe.Ru
—овременное образование
ѕодписатьс€ письмом