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










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

 

”пражнение 1, второй способ решени€ (ƒвумерные массивы)

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

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

PROGRAM PG5_1A;

CONST T= 100;

S = 100;

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

¬ : ARRAY[1..T*S, 1..2] OF INTEGER;

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

BEGIN

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

READLN(N);

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

READLN(M);

FOR I := 1 TO N DO

BEGIN

WRITELN('BB≈ƒ»“E ', M, ' „»—≈Ћ');

FOR J := 1 TO M DO

READ(A[I, J])

END;

MIN := A[1, 1];

  := 0;

FOR I := 1 TO N DO

FOR J := 1 TO M DO

IF MIN>A[I, J] THEN

BEGIN

  := 1;

B[1, 1] := I;

B[1, 2] := J;

MIN := A[l, J]

END ELSE

IF MIN = A[l, J] THEN

BEGIN

K:=K+1;

B[K, 1] := I;

B[K, 2] := J

END;

IF   = 1 THEN BEGIN

WRITELN('Eƒ»HHCTBEHHџ… ћ»Ќ»ћ”ћ MIN = ', MIN);

WRITELN('CTPOKA ', IM, ' —“ќЋЅ≈÷ ', JM)

END ELSE

BEGIN

WRITELN('B ћј“–»÷≈',  , 'ћ»Ќ»ћ”ћќ¬ MIN =', MIN);

FOR I := 1 TO   DO

WRITELN('CTPOKA', B[l, 1], '—“ќЋЅ≈÷', B[l, 2])

END

END.

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

- формируем тело программы и описываем переменные;

- вводим размеры массива ј и значени€ его элементов;

- просматриваем элементы массива, ищем минимальное значение и запоминаем значение индексов в вспомогательном массиве ¬;

- считаем количество минимальных элементов;

- в зависимости от   либо выводим информацию о единственном минимальном элементе, либо организуем вывод информации о всех минимальных элементах из массива ¬.

ѕеременные:

ј - двумерный массив;

¬ - вспомогательный массив;

N, ћ - количество строк и столбцов массива;

I, J - переменные цикла;

  - количество минимальных элементов;

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

MIN - текущий минимум.


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

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


 
     
   
 


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

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

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

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

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


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

 


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