Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.07.07;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Потрепаться";
Текущий архив: 2003.07.07;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.008 c
1-20034
Andrew_kv
2003-06-24 08:28
2003.07.07
Как передать параметры в форму


3-19998
me2
2003-06-12 17:33
2003.07.07
Формирование SQL-запроса


7-20332
DimmanK
2003-04-22 19:57
2003.07.07
Консольное приложение тормозит в полноэкранном режиме


1-20135
INCOGNITO
2003-06-25 04:37
2003.07.07
ReadOnly в ComboBox и ещё пара вопросов


14-20196
Gorlum
2003-06-20 17:10
2003.07.07
Вопрос по .CAB





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский