Вниз
Скачать: CL | DM;

Идет экзамен...нужен текст проги   Найти похожие ветки 

← →
Vampire ©   (2003-06-19 06:16) [0]

Написать и оттестировать функцию.Двумерный массив вещественных переменных( типа MARTIX)с равным числом строк и столбцов. и возвращает произведение элементов массива лежащих на и выше побочной диагонали. массив:
2 3 8
4 5 9
1 6 7
произведение=960


← →
Наталия ©   (2003-06-19 06:56) [1]

Напиши и оттестируй. В чём проблема?


← →
Hooch ©   (2003-06-19 07:28) [2]

>> Vampire ©
ты случайно не из НГТУ ?


← →
Rol   (2003-06-19 07:28) [3]

Побочная диагональ?! Новое слово в современной математике?!


← →
Rol   (2003-06-19 07:36) [4]

Прошу прощения за оффтоп.
>Hooch а ты, случайно, не из Новосибирска? :)
Судя по твоему посту, ты из НГУ?!


← →
Кен ©   (2003-06-19 07:46) [5]

> Rol
А ты случайно не его препод ?


← →
Препод   (2003-06-19 08:28) [6]

Профессор канечна лапух, но аппаратура принём, повторяю: принём...


← →
Жук ©   (2003-06-19 08:29) [7]

Что за диагональ такая ? Может "на и выше главной диагонали" ?


← →
me2   (2003-06-19 09:23) [8]

Если предположить, что "побочная" - это антипод главной диагонали, то что-то типа этого

var
mas: array[1..3, 1..3] of Float;
i, j: Integer;
proiz: Float;
begin
proiz := 1;
for i := 1 to 3 do
for j := 1 to 3 do
if j >= i then
proiz := proiz * mas[i, j];
end.



← →
Hooch ©   (2003-06-19 10:19) [9]

>> Rol я из Новосиба но не с НГУ :-) просто в НГТУ есть препод у которого "двумерный массив вещественных переменных( типа MARTIX)" - любимая фраза :-)


← →
Препод   (2003-06-19 10:26) [10]

Да, да. И учти: matrix has you...


← →
Bel ©   (2003-06-19 10:45) [11]

2 all: Главная диагональ идёт сверху-слева вниз-вправо. Побочная - сверху-справа вниз-влево.

2 > Vampire ©

const
n = 3;
var
mas: array[1..n, 1..n] of Float;
i, j: Integer;
result: Float;
begin
result := 1;
for i := 1 to n do
for j := 1 to (n - i + 1) do
result := result * mas[i, j];
end;</CODE



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.011 c
7-20325
Mikes
2003-04-23 13:11
2003.07.07
Как узнать BIOS ID


6-20185
DeadMeat
2003-04-29 15:26
2003.07.07
FTP без компонентов


1-20082
Voyager_XX
2003-06-23 19:55
2003.07.07
Чем вызвана ошибка Cannot assign a TFont to a TFont...


7-20316
kull
2003-04-23 16:41
2003.07.07
Как узнать путь к com серверу?


14-20211
Igorexa
2003-06-21 05:27
2003.07.07
Установка БД




   Наверх