Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
Pendor
0 / 0 / 0
Регистрация: 29.10.2012
Сообщений: 99
#1

Найти максимальный элемент, расположенный выше главной диагонали - Pascal ABC

09.03.2013, 21:38. Просмотров 488. Ответов 2
Метки нет (Все метки)

Пожалуйста, помогите решить задачу!!!
Дана матрица размером 5*5.
Найти максимальный элемент, расположенный выше главной диагонали.
Заранее, благодарю!!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.03.2013, 21:38
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Найти максимальный элемент, расположенный выше главной диагонали (Pascal ABC):

Найти максимальный элемент, расположенный выше побочной диагонали матрицы - Pascal ABC
В матрице (5,5) найти максимальный элемент, расположенный выше побочной диагонали, вывести его на экран, а столбец в котором он расположен...

Найти максимальный элемент матрицы, расположенный выше побочной диагонали - Pascal ABC
В матрице A , где 'n' <= 100 найти максимальный элемент, расположенный выше побочной диагонали и вывести его на экран

Поменять местами максимальный элемент выше главной диагонали и минимальный элемент ниже главной диагонали - Pascal ABC
Определить максимальный элемент среди элементов квадратной матрицы размера 5x5, лежащих выше главной диагонали, и минимальный элемент среди...

Найти максимальный элемент среди элементов матрицы, лежащих выше главной диагонали - Pascal ABC
Доброго времени суток, помогите написать парочку программ: 1)Задана матрица A(NxN). Определить, что больше: максимальный элемент среди...

Найти максимальный элемент и его индексы среди значений лежащих на главной диагонали матрицы и выше нее - Pascal ABC
Даны натуральное число n и квадратная матрица порядка n целочисленных элементов, где n<=12. Найти максимальный элемент и его индексы...

Найти максимальный элемент, расположенный ниже побочной диагонали - Pascal ABC
Пожалуйста, помогите решить задачу!!! Дана матрица размером 5*5. Найти максимальный элемент, расположенный ниже побочной диагонали. ...

2
ntrx
122 / 122 / 19
Регистрация: 03.01.2013
Сообщений: 241
09.03.2013, 22:06 #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
26
27
program dfd;
uses crt;
const n = 5;
      m = 5;
var a : array[1..n, 1..m] of integer;
    i, j : byte;
    max : integer;
begin
     randomize();
     for i:=1 to n do begin
         for j:=1 to m do begin
             a[i,j] := random(50);
             write(a[i,j]:3,' ');
         end;
         writeln;
     end;
     writeln;
     for i:=1 to n do begin
         for j:=1 to m do
             if (i < j) then
                if (a[i,j] > max) then
                   max := a[i,j];
         writeln;
     end;
     writeln('Max element: ', max);
     readln;
end.
2
Puporev
Модератор
54019 / 41652 / 14731
Регистрация: 18.05.2008
Сообщений: 97,917
10.03.2013, 09:21 #3
Немного причешем
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
const n = 5;
var a : array[1..n, 1..n] of integer;
    i, j : byte;
    max : integer;
begin
randomize;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j] := random(50);
    write(a[i,j]:3,' ');
    if(i=1)and(j=2)then max:=a[i,j]
    else if(j>i)and(a[i,j]>max) then max:=a[i,j]
   end;
  writeln
 end;
writeln('Максимальный элемент выше гл. диагонали=',max)
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.03.2013, 09:21
Привет! Вот еще темы с ответами:

Если максимальный элемент квадратной матрицы находится выше главной диагонали, транспонировать ее - Pascal ABC
задача легкая,но я встретил трудности со знанием синтаксиса паскаля,а вот собственно и задача Если максимальный элемент квадратной...

Найти максимальный элемент выше побочной диагонали матрицы - Pascal ABC
Что не так, не выводит данные. Program n1; Var a:arrayof integer; i,j,k,m,p,s,b,t,Max,N:integer; Begin writeln('введите...

На главной диагонали матрицы найти максимальный элемент, закрасить найденный элемент, вывести преобразованную - Pascal ABC
На главной диагонали матрицы найти максимальный элемент, закрасить найденный элемент, вывести преобразованную матрицу, на месте...

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


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

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

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