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

11.05.2011, 20:21. **Показов** 1400. **Ответов** 3

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

Решите пожалуйста! Завтро срочно здать надо!

Дан двумерный массив из N строк и M столбцов.
а)определить в каком столбце сумма положительных элементов минимальна;
б)Вычислить количество целых элементов в каждой строке;
в)Вычислить количество столбцов, в которых все элементы одинаковы.

@marshal · 11.05.2011, 20:35

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
const n=random(20);m=random(20);
var a:array[1..n,1..m]of real;
b:array[1..n]of real;i,j,k,l:integer;min:real;
begin 
clrscr;min:=9999999;
for i:=1 to n do
begin
for j:=1 to m do
begin
readln(a[i,j]);
if a[i,j]=trunc(a[i,j]) then k:=k+1;
b[i]:=b[i]+a[i,j];
end;
if b[i]<min then begin min:=b[i];l:=i;end;
writeln('в данной строке ',k,' целых элементов');
end;
writeln('в ',l,' столбце');
end.

Первые два

11.05.2011, 20:36

спасибо1

@marshal · 11.05.2011, 20:43

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
const n=random(5);m=random(5);
var a:array[1..n,1..m]of real;
i,j,k,l:integer;
begin
clrscr;
for i:=1 to n do
begin
k:=0;
for j:=1 to m do
begin
readln(a[i,j]);
if j>1 then if a[i,j-1]=a[i,j] then k:=k+1;
end;
writeln('следующая строка');
if k+1=m then l:=l+1;
end;
writeln(l);
end.

Третья

Новые блоги и статьи Все статьи Все блоги /
Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .

Strangehold

	Определить в каком столбце матрицы сумма положительных элементов минимальна 11.05.2011, 20:21. Показов 1400. Ответов 3 Метки нет (Все метки) Решите пожалуйста! Завтро срочно здать надо! Дан двумерный массив из N строк и M столбцов. а)определить в каком столбце сумма положительных элементов минимальна; б)Вычислить количество целых элементов в каждой строке; в)Вычислить количество столбцов, в которых все элементы одинаковы.

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

Решение

Решение