Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 18.10.2010
Сообщений: 11

Найти произведение элементов последних двух строк и количество положительных элементов в первых трёх столбцах матрицы

18.10.2010, 00:16. Показов 1128. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Решите, пожалуйста, эту задачу.
Матрицу размером 4 на 6 заполнить случайными целыми числами от -9 до 9 и вывести. Найти произведение элементов последних двух строк. Найти количество положительных элементов в первых трёх столбцах.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
18.10.2010, 00:16
Ответы с готовыми решениями:

Найти разность между суммой всех элементов стоящих в столбцах счетными номерами, и суммой всех элементов стоящих в столбцах с нечетными номерами.
Здравствуйте! Дан двумерный массив целых чисел. Найти разность между суммой всех элементов стоящих...

В четных строках найти сумму элементов больших -3, а в нечетных столбцах произведение положительных элементов
Дана матрица А В четных строках найти сумму элементов больших -3, а в нечетных столбцах...

Найти количество положительных элементов в столбцах матрицы с нечетными номерами
Здраствуйте!!! Очень надо написать программу!!! Дан массив 5 на 5 целых чисел. Найти количество...

1
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
18.10.2010, 10:51
Лучший ответ Сообщение было отмечено Русич57 как решение

Решение

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
uses crt;
const n=4;
      m=6;
var a:array[1..n,1..m] of integer;
    i,j,k:byte;
    p:real;//типа longint может не хватить
begin
clrscr;
randomize;
writeln('Матрица:');
for i:=1 to n do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=random(19)-9;
    write(a[i,j]:4);
   end;
  writeln;
 end;
writeln;
p:=1;
for i:=n-1 to n do
for j:=1 to m do
p:=p*a[i,j];
writeln('Произведение элементов двух последних строк=',p:0:0);
//в матрице есть ноли, поэтому часто р=0
k:=0;
for j:=m-2 to m do
for i:=1 to n do
if a[i,j]>0 then k:=k+1;
write('Количество положительных в трех последних столбцах=',k);
readln
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
18.10.2010, 10:51
Помогаю со студенческими работами здесь

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

Если сумма двух первых строк матрицы А меньше суммы элементов двух последних её строк
Если сумма двух первых строк матрицы А меньше суммы элементов двух последних её строк. Изменить...

Дана матрица в столбцах с минимальным количеством отрицательных элементов все положительные элементы заменить на 0
Дана матрица A в столбцах с минимальным количеством отрицательных элементов все положительные...

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

Заменить в третьем по счёту слове первую букву на последнюю букву Заменить в третьем по счёту слове первую букву на последнюю букву этого же слова.
Заменить в третьем по счёту слове первую букву на последнюю букву этого же слова.


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

Или воспользуйтесь поиском по форуму:
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
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru