0 / 0 / 0
Регистрация: 26.11.2011
Сообщений: 8
1

Поменять местами столбец матрицы, содержащий наибольшее значение, со столбцом, содержащим наименьшее

09.12.2011, 15:40. Показов 1443. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
в массиве В(3*3) поменять местами столбец содержащий наибольшее значение со столбцом,содержащим наименьшее значение
ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ пожалуйста...
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.12.2011, 15:40
Ответы с готовыми решениями:

Поменять местами столбец, содержащий максимальный элемент матрицы, со столбцом с номером q
Даны натуральные числа n,q и квадратная матрица порядка n целочисленных элементов, где...

Поменять местами столбец, содержащий максимальный элемент матрицы, со столбцом с номером q
Всем привет.помогите закончить задачу...чет делал,делал но не хочет( Даны натуральные числа n,q и...

поменять местами первый столбец со столбцом, содержащим наибольший элемент матрицы.
дано задание вида: В заданной матрице поменять местами первый столбец со столбцом, содержащим...

Поменять местами первый столбец матрицы со столбцом, содержащим наибольший элемент главной диагонали
В заданной матрице поменять местами первый столбец со столбцом, содержащим наибольший элемент...

1
--\.founder./--
565 / 565 / 392
Регистрация: 20.10.2011
Сообщений: 867
09.12.2011, 16:28 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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
Uses crt;
 
const n=3;
 
var b:array [1..n,1..n] of integer;
i,j,min,max,mx,mn:integer;
 
Procedure Swap(var x,y:integer);
var t:integer;
    begin
        t:=x;
        x:=y;
        y:=t;
    end;
 
 
begin
   For i:=1 to n do
   begin
     for j:=1 to n do
     begin
     randomize;
     b[i,j]:=random(100)+1;
     Write(b[i,j]:5);
     end;
   writeln;
   end;
   min:=b[1,1]; max:=b[1,1];
 
   For i:=1 to n do
     for j:=1 to n do
     begin
     if b[i,j]<min then min:=b[i,j];
     if b[i,j]>max then max:=b[i,j];
     end;
     
   For i:=1 to n do
     for j:=1 to n do
     begin
     if b[i,j]=max then mx:=j;
     if b[i,j]=min then mn:=j;
     end;
     
   For i:=1 to n do
     Swap(b[i,mx],b[i,mn]);
   Writeln;
   
   For i:=1 to n do
   begin
     for j:=1 to n do
     Write(b[i,j]:5);
   writeln;
   end;
 
 
end.
1
09.12.2011, 16:28
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.12.2011, 16:28
Помогаю со студенческими работами здесь

Столбец содержащий минимальный элемент поменять местами с последним столбцом
Дан вещественный массив из 3 строк и 5 столбцов.Столбец содержащий минимальный элемент поменять...

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

Поменять местами столбец матрицы, в котором находится максимальный элемент, с первым столбцом
Написать программу, включающую следующие процедуры:  Создать матрицу В(7х7) случайных чисел в...

Задан целочисленный массив NxМ. Вставить столбец из нулей перед столбцом, содержащим минимальный элемент матрицы.
Задан целочисленный массив NxМ. Вставить столбец из нулей перед столбцом, содержащим минимальный...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru