|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.07.2014, 11:25 | #1 |
Новичок
Джуниор
Регистрация: 06.07.2014
Сообщений: 1
|
массивы и подпрограммы
Здравствуйте. Помогите пожалуйста
1) Найти суммы компонент вещественной матрицы m[n, k] по строкам и записать их в одномерный массив v [n]. 2) Заменить значения компонент в строках матрицы m[n, k] на 1, если сумма соответствующей строки окажется больше 0, на −1, если сумма меньше 0, на 0, если сумма равна 0. 3) Найти минимальное значение компонент массива v [n]. Если минимумов в массиве несколько, то запомнить индекс первого встреченного при переборе из минимумов. На экран вывести исходную матрицу m[n, k], массив v [n], изменённую матрицу m[n, k], первую встреченную минималь- ную компоненту с индексом. CONST A:ARRAY[1..4,1..2] of REAL=((-1.9, -3.1),(0, 0), (0, 0.8),(3.8, -8.8)); VAR Number_of_Negative_Elements:ARRAY[1..2] of BYTE; R:REAL; i,j:INTEGER; BEGIN FOR i:=1 TO 4 DO BEGIN FOR j:=1 TO 2 DO Write(A[i,j]:6:1); WriteLn; END; end. и всё, а дальше не могу ........ подскажите как дальше - аналитическую часть я понимаю а вот как в паскале оформить - увы никак(((( Заранее спасибо |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
(Pascal)Двумернные массивы и подпрограммы | litokha | Помощь студентам | 1 | 12.12.2011 17:32 |
Двумерные массивы и подпрограммы | litokha | Помощь студентам | 2 | 06.12.2011 13:48 |
подпрограммы и массивы | tymac9n | Общие вопросы C/C++ | 7 | 17.05.2011 19:26 |
Массивы и подпрограммы. | sanyok_amd | Помощь студентам | 0 | 19.04.2011 14:27 |
Подпрограммы. Массивы. на С# | Stasnislav | Помощь студентам | 4 | 13.05.2010 15:21 |