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

Вниз

Вопрос по массивам ?   Найти похожие ветки 

 
Barlok   (2003-05-26 19:14) [0]

Подскажите как в матрице a : array[1..n,1..n] of real найти среднее арифметическое элементов каждой строки матрицы и вычисть его из элементов этой строки. Помогите пожалуйста.


 
Palladin   (2003-05-26 19:19) [1]

тоже высшее, судя по возрасту последний курс... педучилища...


 
Barlok   (2003-05-26 19:23) [2]

Это ответ :) .


 
VMcL   (2003-05-26 19:24) [3]

>Barlok © (26.05.03 19:14)

Среднее арифметическое не находят, его вычисляют.


 
MegaVolt   (2003-05-26 19:24) [4]

Функция Mean (
const Data: array of Double ): Extended;


--------------------------------------------------------------------------------

Модуль: Math

Описание
Функция возвращает среднее арифметическое всех значений массива чисел Data.

Пример
var

Mas: array of Real;
m: Real;
i: byte;

begin

...
SetLength(Mas, 10);
for i:= 0 to 9 do Mas[i]:= i/10;
m:= Mean(Mas); // m:= 0.45
...

end;



Взято с http://www.atrussk.ru/delphi/5/content.htm


 
Palladin   (2003-05-26 19:26) [5]

1 операция сложения в паскале это символ "+", пример - x:=y+z
2 операция вычитания в паскале это символ "-", пример - x:=y-z
3 среднее арифметическое считается так: берутся все цифры и складываются, а потом полученая сумма делится на количество этих цифр - пример SredneeArif:=(x+y+z)/3;

догоняешь?


 
MegaVolt   (2003-05-26 19:31) [6]

Так лениво же самому писать это :) Есть же готовая функция. Врядли чел. спрашивал формулу для расчёта :) Хотя всё бывает :)


 
VMcL   (2003-05-26 19:32) [7]

>Palladin © (26.05.03 19:26)
>берутся все цифры и складываются

Цифры ли? Или, всё-таки, числа, :)


 
Palladin   (2003-05-26 19:33) [8]


> VMcL © (26.05.03 19:32)

рано ему еще с числами работать, дети начинают понимать разницу между числами и цифрами в более позднем возрасте, а пока для него везде цыферьки...


 
VMcL   (2003-05-26 19:34) [9]

>Palladin © (26.05.03 19:33)

Deal.


 
Barlok   (2003-05-26 19:42) [10]

Я делаю на Delphi через StringGrid. Ввожу числа в StringGrid
запоминаю в матрице a[i,j],

for j := 1 to n do
for i := 1 to n do
begin
a[i,j] := StrToFloat(StringGrid1.Cells[i-1,j-1]);
end;

дальше незнаю.


 
old_monkey   (2003-05-26 21:05) [11]

Ну не знаешь, так пробеги в цикле for - самый дубовый способ.
Его в средней школе проходят. Без уклона - 10 кл, с уклоном - 7.



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

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

Наверх





Память: 0.46 MB
Время: 0.009 c
6-13361
Kickboxing
2003-04-02 13:45
2003.06.05
Информация об удаленном ПК


14-13365
MalkoLinge
2003-05-16 12:35
2003.06.05
OFF line Прога для чтения форумов


6-13346
velsi
2003-04-04 12:27
2003.06.05
Текущие сеансы IIS/FTP server


11-13105
AlbertHakimov
2002-09-12 13:48
2003.06.05
Компонент TKOLImageList


3-13035
Grac
2003-05-15 20:12
2003.06.05
Соединение с базой данных





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский