Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Построение интерполяционного члена Ньютона https://www.cyberforum.ru/ turbo-pascal/ thread961535.html
Такая задача: Построить интерполяционный член Ньютона по известным в узнах x0, x1, ..., x5 значениям функции f(x). Вычислить значения этого многочлена в равномерной сетке точек на отрезке с шагом h...
Turbo Pascal Определение вида треугольника по сторонам в TP 7.0
В треугольнике известны стороны a,b,c. Определить является ли он равносторонним, равнобедренным или разносторонним. Соответственно вывести сообщение о результате. В роли примера задаю значения...
Turbo Pascal Вычислить арифметическое выражение с заданной точностью
Написать программы на паскале для решения этих примеров Для каждой задачи создавайте отдельную тему. Текстовую часть заданий набирайте вручную. Читайте правила форума
Turbo Pascal Сортировки В файле input.txt содержаться сведения о группе студентов в формате: номер группы запись о каждом студенте группы содержит: ФИО,год рождения.оценки по пяти предметам 1.переписать данные... https://www.cyberforum.ru/ turbo-pascal/ thread961477.html
Turbo Pascal В массиве найдите произведение максимального и минимального элементов https://www.cyberforum.ru/ turbo-pascal/ thread961434.html
В массиве S(7) найдите произведение максимального и минимального элементов и их порядковые номера. Буду очень благодарен.
Turbo Pascal Вычислить значение выражения
помогите пожалуйста Нужно написать программу на Паскале 11 класс
Определить номер минимального элемента в каждой строке матрицы Turbo Pascal
Вывести на экран матрицу 3х6, элементами которой являются целые случайные числа из интервала . Определить номер минимального элемента в каждой строке
Turbo Pascal Записать формулы Помогите записать формулы на языке pascal https://www.cyberforum.ru/ turbo-pascal/ thread961416.html
Turbo Pascal Проверить делимость числа на три https://www.cyberforum.ru/ turbo-pascal/ thread961379.html
Число делиться на 3,если сумма его цифр делиться на 3 .Проверить этот признак на примере заданного трёхзначного числа
Turbo Pascal Сформировать вектор, компоненты которого являются произведением элементов соответствующих столбцов матрицы Дана целочисленная матрица А порядка N. Cформировать вектор X, компоненты которого являются произведением элементов соответствующих столбцов. https://www.cyberforum.ru/ turbo-pascal/ thread961358.html
Модератор
62965 / 46969 / 32371
Регистрация: 18.05.2008
Сообщений: 113,838
25.09.2013, 08:02 0

Определить минимальный элемент в каждом столбце матрицы и выбрать из них максимальный

25.09.2013, 08:02. Просмотров 1210. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение


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
26
27
28
29
30
31
uses crt;
const m=10;
      n=8;
var a:array[1..m,1..n] of integer;
    i,j:byte;
    mn,mx:integer;
begin
clrscr;
randomize;
writeln('Исходная матрица:');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=19+random(31);
    write(a[i,j]:4);
   end;
  writeln;
 end;
for j:=1 to n do
 begin
  mn:=a[1,j];
  for i:=2 to m do
  if a[i,j]<mn then mn:=a[i,j];
  writeln('Минимальный в столбце ',j,'=',mn);
  if j=1 then mx:=mn
  else if mn>mx then mx:=mn;
 end;
write('Максимальный из них=',mx);
readln
end.


Вернуться к обсуждению:
Определить минимальный элемент в каждом столбце матрицы и выбрать из них максимальный
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.09.2013, 08:02
Готовые ответы и решения:

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

Определить минимальный элемент в каждом столбце и максимальный элемент в каждой строке матрицы
Определить минимальный элемент в каждом столбце и максимальный элемент в каждой строке матрицы....

В каждом столбце найти максимальный элемент, а среди них – минимальный
Дан двумерный массив вещественных чисел размерностью nхm. В каждом столбце найти максимальный...

Поменять местами минимальный и максимальный элемент в каждом столбце матрицы
Дано матрицу размером 5 x 10. Превратить матрицу, поменяв местами минимальный и максимальный...

__________________
Помогаю в написании студенческих работ здесь.
1
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.