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

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

19.12.2008, 21:23. Показов 1747. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
ребят помогите с задачкой:
Дана матрица W размером mхn. Найти количество положительных элементов каждой строки матрицы и результаты записать в вектор Wpos. Формирование Wpos и его вывод выполнить в процедуре с именем Find_Wpos.
помогите, очень надо:'(
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
19.12.2008, 21:23
Ответы с готовыми решениями:

Найти количество положительных элементов в каждой строки матрицы и записать их значения в одномерный массив В
const n=5;m=7; var A:array of integer; B: array of real; i,j,k:integer; begin randomize; write('Массив...

Найти количество положительных элементов в каждой строки матрицы и записать их значения в одномерный массив В
Сформировать двумерный массив А размером 5*7 с помощью генератора случайных чисел и вывести элементы массива на экран. Найти количество...

В каждой строке матрицы найти количество положительных элементов
1.В каждой строке двумерного массива.Найти количество положительных элементов. 2.В каждом столбце двумерного массива найти max ...

2
 Аватар для Chulaveg
2 / 2 / 0
Регистрация: 17.12.2008
Сообщений: 11
19.12.2008, 21:26
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
Program Lab_4;
uses crt;
var
x:array[1..20] of integer;
s,Kol,i,n:integer;
begin
clrscr;
writeln('vvedite n');
readln(n);
randomize;
for i:=1 to n do
begin
x[i]:=random(50)-20;
write(x[i],' ');
end;
writeln;writeln;
s:=0;
kol:=0;
for i:=1 to n do
begin
s:=s+x[i];
kol:=n;
end;
writeln('s=',s:3);
writeln('kol=',kol:3);
end.
Добавлено через 1 минуту 3 секунды
недавно сам похожую писал
1
0 / 0 / 0
Регистрация: 19.12.2008
Сообщений: 19
19.12.2008, 21:54  [ТС]
пасибо очень выручил!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
19.12.2008, 21:54
Помогаю со студенческими работами здесь

Найти количество N положительных элементов в каждой строке матрицы
Дана матрица А. а) найти количество N положительных элементов в каждой строке. б) найти сумму S отрицательных элементов в каждом...

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

Найти среднее арифметическое положительных элементов каждой строки матрицы
2)Задана матрица A(M,N), где M<=25, N<=10. Определить средне арифметическое положительных элементов каждой строки этой матрицы. Результат...

Если количество четных элементов в каждой строке матрицы одинаково, то найти сумму квадратов положительных элементов
Матрица,размерности н х м, вводится из текстового файла.Если количество четных элементов в каждой строке матрицы одинаково,то найти сумму...

Найти номер первой строки матрицы, содержащей равное количество положительных и отрицательных элементов
Дана целочисленная матрица размером aхb. Вывести номер ее первой строки,содержащей равное количество положительных и отрицательных...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru