Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
1 / 1 / 0
Регистрация: 22.04.2020
Сообщений: 23

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

01.06.2020, 06:41. Показов 1097. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В квадратной матрице размером К*К, имеющей имя МА содержаться целые числа. К- число строк и столбцов. Ввести элементы матрицы с клавиатуры. Определить и вывести на экран сумму положительных элементов в каждом столбце. Определить столбец с минимальным значением этой суммы и вывести его номер на экран.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
01.06.2020, 06:41
Ответы с готовыми решениями:

Задача на паскале. Не могу никак разобраться, как выдать минимальное расстояние?
Мальчик плавает в бассейне размером N на M метров. В некоторый момент времени он находится на расстоянии `X` от одного из длинных бортиков...

Помогите пожалуйста, не могу разобраться как сохранять файл, например в формате bmp?
Помогите пожалуйста, не могу разобраться как сохранять файл, например в формате bmp? uses graphabc; var pic: picture; y:...

Никак не могу разобраться
Люди помогите пожалуйста, мучаюсь никак не получается ((( Ввести одномерный массив A из N элементов. Каждый элемент в массиве...

6
Эксперт по компьютерным сетямЭксперт Pascal/Delphi
 Аватар для TAVulator
4191 / 1292 / 237
Регистрация: 27.07.2009
Сообщений: 3,962
01.06.2020, 06:42
В чем конкретно не получается разобраться?
0
1 / 1 / 0
Регистрация: 22.04.2020
Сообщений: 23
01.06.2020, 07:20  [ТС]
если быть точнее, то почти во всем задание, у меня то получится одно, а дроге сломается, можете пожалуйста решить данное задание, я попробую разобраться, мне это очень нужно
0
 Аватар для JuriiMW
5095 / 2661 / 2355
Регистрация: 10.12.2014
Сообщений: 10,060
01.06.2020, 08:40
Pascal
1
2
3
4
5
begin
  var k:=ReadInteger;
  var ma:=ReadMatrInteger(k,k);
  ma.Cols.Select(c->c.Sum).PrintLn.Numerate.MinBy(x->x[1])[0].PrintLn;
end.
0
1 / 1 / 0
Регистрация: 22.04.2020
Сообщений: 23
01.06.2020, 17:46  [ТС]
Это же не то?
0
 Аватар для JuriiMW
5095 / 2661 / 2355
Регистрация: 10.12.2014
Сообщений: 10,060
01.06.2020, 17:54
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Ах да!
Нужны же суммы только положительных…
Ну тогда вот так:
Pascal
1
2
3
4
5
begin
  var k:=ReadInteger;
  var ma:=ReadMatrInteger(k,k);
  ma.Cols.Select(c->c.Select(x->x>0?x:0).Sum).PrintLn.Numerate.MinBy(x->x[1])[0].PrintLn;
end.
Теперь же то?
1
1 / 1 / 0
Регистрация: 22.04.2020
Сообщений: 23
02.06.2020, 19:31  [ТС]
спасибо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
02.06.2020, 19:31
Помогаю со студенческими работами здесь

Пожалуйста сделайте а то я не как не могу разобраться
Вывести все трехзначные числа все три которых их делители. Заранее спасибо!

Добрий вечер !Напишите мне кто-нибудь пожалуйста эту программу с комментариями, чтобы я смогла разобраться, потому что никак не могу понять этот язык
создать файл записей (фамилия клиента, паспортные данные, № счета, сумма вклада) с зашифрованным № счета и суммой вклада всех клиентов...

Никак не могу разобраться с ООП
В общем товарищи не могу сделать простого(наверное) Нужно привести в красивый вид, избавится от switch/case есть очень много методов...

Не могу никак разобраться с SQL
Не могу никак разобраться с SQL. Вот например у меня есть таблица data1.db. Я её загружаю void __fastcall TForm1::Button1Click(TObject...

Callback, никак не могу разобраться
Доброго времени суток. Есть следующий код addScr : function(domain, src, jsonpCallback, paramName) { var scriptParams =...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru