Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
ARTEGA
0 / 0 / 0
Регистрация: 03.02.2010
Сообщений: 3
#1

Вычислите вектор - Delphi

07.02.2010, 20:58. Просмотров 402. Ответов 1
Метки нет (Все метки)

Дана матрица A(N,M).Вычислите вектор X(M), где значение Xj равно сумме положительных элементов j- ого столба матрицы A.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.02.2010, 20:58
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вычислите вектор (Delphi):

Найти максимальное значение в каждой строке. Из этих значений получить вектор из 5-ти элементов. Выдать матрицу А и вектор В. - Delphi
Дана матрица A (5x4). Заполнить ее значениями вещественного типа. Найти максимальное значение в каждой строке. Из этих значений получить...

Вычислите P - Delphi
Народ, помогите, пожалуйста с задачей.. после завтра сдавать,а я не успеваю. Заранее спс.. Вычислите P = 1 . 2 + 2 . 3 . 4 + 3 . 4 . 5...

Вычислите объем шара - Delphi
Помогите пожалуйста написать программки , буду очень благодарен . Уже давно не чего не писал так что сам не смогу . 1) Вычислите...

Вычислите первые n членов арифметической прогрессии - Delphi
вот такое задание... помогите разобраться плиз

Рекурсия: Вычислите значение заданной формулы - Delphi
Вводимая последовательность символов представляет собой формулу пока- занного ниже вида (М означает функцию max, a m — min). Вычислите...

вычислите площадь и длину высоты треугольника - Delphi
Пусть даны координаты трех точек на плоскости. Если они могут быть вершинами равносторонего треугольника , вычислите его площадь и длину...

1
Puporev
Модератор
53851 / 41484 / 14587
Регистрация: 18.05.2008
Сообщений: 97,239
07.02.2010, 22:16 #2
Delphi
1
2
3
4
5
6
7
8
9
10
var a:array of array of integer;
     x:array of integer;
..............................
for j:=0 to m-1 do
 begin
   s:=0;
   for i:=0 to n-1 do
   if a[i,j]>0 then s:=s+a[i,j];
   x[j]:=s;
 end;
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.02.2010, 22:16
Привет! Вот еще темы с ответами:

Вычислите сумму ряда с заданной степенью точности - Delphi
извините не могли бы мне помочь, с решением var a,z,s:real; n:integer; begin a:=0.0001; n:=1; z:=-1; s:=-1; while...

Вычислите сумму ряда с заданной степенью точности - Delphi
Вычислите сумму ряда с заданной степенью точности \sum_{n=1}^{\infty}\left(-1 \right)^n\,\times\,\frac{1}{2n+1}\;;\;\alpha=0.0001

Вычислите сумму ряда с заданной степенью точности - Delphi

Вычислите сумму, используя рекурсивную функцию в Delphi - Delphi
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; ...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru