Удалить столбец матрицы

@PlsW8ForMe · Регистрация: 07.03.2010

Студворк — интернет-сервис помощи студентам

Дана матрица 5 на 4. Найти столбец с минимальной суммой элементов и удалить его из матрицы. Напечатать матрицу 5 на 3.

@Puporev · 24.11.2012, 14:22

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
uses crt;
var a:array[1..5,1..4] of integer;
    i,j,jmn,mn,sm:integer;
begin
randomize;
writeln('Исходный массив:');
for i:=1 to 5 do
 begin
  for j:=1 to 4 do
   begin
    a[i,j]:=random(50);
    write(a[i,j]:4);
   end;
  writeln;
 end;
mn:=0;
for i:=1 to 5 do
mn:=mn+a[i,1];
jmn:=1;
for j:=2 to 4 do
 begin
  sm:=0;
  for i:=1 to 5 do
  sm:=sm+a[i,j];
  if sm<mn then
   begin
    mn:=sm;
    jmn:=j;
   end;
 end;
writeln('Минимальная сумма=',mn,' в столбце ',jmn);
if jmn<4 then
for j:=jmn to 3 do
for i:=1 to 5 do
a[i,j]:=a[i,j+1];
writeln('Удаление столбца ',jmn);
for i:=1 to 5 do
 begin
  for j:=1 to 3 do
  write(a[i,j]:4);
  writeln;
 end
end.

Новые блоги и статьи Все статьи Все блоги /
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .

@PlsW8ForMe 0 / 0 / 0 Регистрация: 07.03.2010 Сообщений: 6

	Удалить столбец матрицы 24.11.2012, 13:49. Показов 10691. Ответов 1 Метки нет (Все метки) Дана матрица 5 на 4. Найти столбец с минимальной суммой элементов и удалить его из матрицы. Напечатать матрицу 5 на 3. 0

Удалить столбец матрицы

Решение