Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

PROGRAM PG7_1;





CONST T = 100;S = 100;

VAR A: ARRAY[1..T, 1..S] 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 ТО N DO

BEGIN

WRITELN('BBOДИTE ЧЕРЕЗ ПРОБЕЛ ', M,' ЧИСЕЛ');

FOR J:= 1 ТО М DO

READ(A[I, J])

END;

MIN:= A[1, 1];

IM:= 1;JM:= 1;K:= 0;

FOR I:= 1 TO N DO

FOR J:= 1 TO M DO

IF MIN>A[I, J] THEN

BEGIN

К:= 1;IM:= I;JM:= J;

MIN:= A[l, J]

END

ELSE

IF MIN = A[l, J] THEN К:= K+1;

IF К = 1 THEN

BEGIN

WRITELN('B МАТРИЦЕ ОДИН МИНИМАЛЬНЫЙ ЭЛЕМЕНТ MIN =', MIN);

WRITELN('B ', IM, 'СТРОКЕ, В ', JM, 'СТОЛБЦЕ')

END

ELSE

BEGIN

WRITELN('B МАТРИЦЕ ', К, 'МИНИМАЛЬНЫХ ЭЛЕМЕНТОВ MIN = ', MIN);

FOR I:= IM TO N DO

FOR J:= 1 TO M DO

IF MIN = A[l, J] THEN WRITELN('B СТРОКЕ ', I,'В СТОЛБЦЕ', J)

END

END.

Для решения задачи:

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

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

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

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

- в зависимости от К либо выводим информацию о единст­венном минимальном элементе, либо организуем повторный просмотр массива А для вывода информации о всех мини­мальных элементах.

Переменные:

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

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

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

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

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

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

ВВЕДИТЕ КОЛИЧЕСТВО СТРОК N = 5

ВВЕДИТЕ КОЛИЧЕСТВО СТОЛБЦОВ М = 6







Дата добавления: 2015-09-07; просмотров: 358. Нарушение авторских прав; Мы поможем в написании вашей работы!




Обзор компонентов Multisim Компоненты – это основа любой схемы, это все элементы, из которых она состоит. Multisim оперирует с двумя категориями...


Композиция из абстрактных геометрических фигур Данная композиция состоит из линий, штриховки, абстрактных геометрических форм...


Важнейшие способы обработки и анализа рядов динамики Не во всех случаях эмпирические данные рядов динамики позволяют определить тенденцию изменения явления во времени...


ТЕОРЕТИЧЕСКАЯ МЕХАНИКА Статика является частью теоретической механики, изучающей условия, при ко­торых тело находится под действием заданной системы сил...

Примеры решения типовых задач. Пример 1.Степень диссоциации уксусной кислоты в 0,1 М растворе равна 1,32∙10-2   Пример 1.Степень диссоциации уксусной кислоты в 0,1 М растворе равна 1,32∙10-2. Найдите константу диссоциации кислоты и значение рК. Решение. Подставим данные задачи в уравнение закона разбавления К = a2См/(1 –a) =...

Экспертная оценка как метод психологического исследования Экспертная оценка – диагностический метод измерения, с помощью которого качественные особенности психических явлений получают свое числовое выражение в форме количественных оценок...

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

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

Типовые ситуационные задачи. Задача 1. Больной К., 38 лет, шахтер по профессии, во время планового медицинского осмотра предъявил жалобы на появление одышки при значительной физической   Задача 1. Больной К., 38 лет, шахтер по профессии, во время планового медицинского осмотра предъявил жалобы на появление одышки при значительной физической нагрузке. Из медицинской книжки установлено, что он страдает врожденным пороком сердца....

Типовые ситуационные задачи. Задача 1.У больного А., 20 лет, с детства отмечается повышенное АД, уровень которого в настоящее время составляет 180-200/110-120 мм рт Задача 1.У больного А., 20 лет, с детства отмечается повышенное АД, уровень которого в настоящее время составляет 180-200/110-120 мм рт. ст. Влияние психоэмоциональных факторов отсутствует. Колебаний АД практически нет. Головной боли нет. Нормализовать...

Studopedia.info - Студопедия - 2014-2025 год . (0.013 сек.) русская версия | украинская версия