Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
Irochka_sever
0 / 0 / 0
Регистрация: 22.05.2015
Сообщений: 4
#1

Построить и записать алгоритм определения минимального элемента и его индекса в столбцах матрицы

22.01.2016, 09:28. Просмотров 504. Ответов 1
Метки нет (Все метки)

Всем добрый день! Я с просьбой!

Задание: построить и записать алгоритм определения минимального элемента и его индекса в столбцах матрицы MxN

Кажется я где-то свернула не туда) Глаз замылился уже, помогите, плиз )
Заранее спасибо.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
var
    ar: Array[1..n, 1..m] Of LongInt;
    i, j, minI, minJ: 1..n, 1..m;
begin
    Randomize; minI := 1; minJ := 1;
    for i := 1 to n do
    begin
        for j := 1 to m do
        begin
            ar[i, j] := Random(199) - 99;
            Write(ar[i, j]:4);
            if (ar[minI, minJ] > ar[i, j])
            then
            begin
                minI := i;
                minJ := j;
            end;
        end;
        WriteLn;
    end;
    WriteLn;
    WriteLn('min elem at [', minI, '][', minJ, ']=', ar[minI, minJ]);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.01.2016, 09:28
Ответы с готовыми решениями:

Определение максимального элемента без определения его индекса
Определение максимального элемента без определения его индекса. На выходе к...

дан вектор А (N). написать программу нахождения минимального элемента вектора и его индекса. если индекс элемента парный, то часть вектора перед миним
дан вектор А (N). написать программу нахождения минимального элемента вектора и...

Дан массив А из 10 элементов. Составить программу для нахождения минимального элемента массива и его индекса
Дан массив А из 10 элементов. Составить программу для нахождения минимального...

Составить программу определения минимального элемента матрицы А(3Х5). Элементы матрицы – целые числа
Составить программу определения минимального элемента матрицы А(3Х5). Элементы...

Процедура для определения минимального элемента матрицы
Используя данную процедуру, определить значение минимального элемента заданной...

1
Puporev
Модератор
54221 / 41854 / 28923
Регистрация: 18.05.2008
Сообщений: 98,534
22.01.2016, 10:39 #2
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
25
var
    ar: Array[1..20, 1..20] Of integer;
    n, m,i, j, minI, minJ: 1..20;
begin
writeln('Введите размеры матрицы от 1 до 20');
readln(n,m);
Randomize;
minI := 1;
minJ := 1;
for i := 1 to n do
 begin
  for j := 1 to m do
   begin
    ar[i, j] := Random(199) - 99;
    Write(ar[i, j]:4);
    if (ar[minI, minJ] > ar[i, j]) then
     begin
      minI := i;
      minJ := j;
     end;
   end;
  WriteLn;
 end;
WriteLn('min elem at [', minI, '][', minJ, ']=', ar[minI, minJ]);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.01.2016, 10:39

Составить функцию для определения минимального элемента матрицы NxN
Составить функцию для определения минимального элемента матрицы NxN. используя...

Напишите программу определения индексов для максимального (минимального) элемента введенной матрицы
Напишите программу определения индексов (номер строки и столбца) для...

Определить величину минимального элемента матрицы и вывести его и его индекс на экран
Книга "Паскаль для школьников", 2005год. Ушаков, Юркова. В этой книге есть...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru