Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Argenitna21
0 / 0 / 1
Регистрация: 17.06.2012
Сообщений: 9
1

Сформировать одномерный массив, каждый элемент которого равен максимальному элементу соответствующего столбца

17.06.2012, 15:47. Просмотров 861. Ответов 2
Метки нет (Все метки)

Сформировать одномерный массив, каждый элемент которого равен максимальному элементы соответствующего столбца произвольно заданной матрицы размера MxN. В сформированном массиве найти минимальный элемент.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.06.2012, 15:47
Ответы с готовыми решениями:

Сформировать массив, каждый элемент которого равен наибольшему по модулю элементу соответствующего столбца
Дан двумерный массив размерностью 5 x 6, заполненный целыми числами с...

Сформировать массив, каждый элемент которого равен первому четному элементу соответствующего столбца
5.1 Дан двумерный массив размерностью 6x5,заполненный числами с...

Сформировать массив, каждый элемент которого равен первому четному элементу соответствующего столбца
Дан двумерный массив размером 6 на 5.Сформировать одномерный массив,каждый...

Создать одномерный массив, каждый элемент которого равен первому чётному элементу соответствующего столбца
1. Дан двумерный массив размером 6*5, заполненный случайными числами....

Сформировать одномерный массив, каждый элемент которого равен произведению четных положительных элементов соответствующего столбца
решите пожалуйста 1) Дан двумерный массив с размерность 5*6, заполненный...

2
MayaNash
1291 / 460 / 151
Регистрация: 24.08.2011
Сообщений: 2,248
17.06.2012, 16:02 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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
uses crt;
 
var a: array [1..100,1..100] of integer;
    m,n,i,j,min: integer;
    b: array [1..100] of integer;
 
 
begin clrscr; randomize;
write('m = '); readln(m);
write('n = '); readln(n);
writeln;
 
writeln('Ishodnyi massiv:');
for i:=1 to m do
 begin
 for j:=1 to n do
  begin
  a[i,j]:=random(20);
  write(a[i,j]:4);
  end;
 writeln;
 end;
writeln;
 
writeln('Poluchennyi massiv:');
for i:=1 to n do
 begin
 b[i]:=a[1,i]; {chtoby bylo s chem sravnivati}
 
 for j:=2 to m do
  if a[j,i] > b[i] then
   b[i]:=a[j,i];
 
 write(b[i]:4);   {srazu vypisyvaem}
 
 if i = 1 then min:=b[i] else
  if b[i] < min then min:=b[i];   {i srazu ischem minimalinoe}
 end;
writeln; writeln;
 
writeln('Minimalinyi iz nih = ',min);
readkey; end.
0
Argenitna21
0 / 0 / 1
Регистрация: 17.06.2012
Сообщений: 9
17.06.2012, 22:42  [ТС] 3
Цитата Сообщение от Керра Посмотреть сообщение
Pascal
1
uses crt;... end.
спасибо огромное, просто выручили
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.06.2012, 22:42

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

Сформировать массив, каждый элемент которого равен сумме отрицательных элементов соответствующего столбца
Сформировать одномерный массив, каждый элемент которого равен сумме...

Сформировать массив, каждый элемент которого равен количеству отрицательных элементов соответствующего столбца
Дан двухмерный массив. Сформулировать одномерный массив, каждый элемент...


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

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

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