Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.05.2009, 10:51   #1
Grisha248
Пользователь
 
Регистрация: 21.05.2009
Сообщений: 15
Печаль Дана квадратная матрица порядка N. Вычислить среднее арифметическое положительных элементов матрицы,

Помогите решить на Дельфи. Дана квадратная матрица порядка N. Вычислить среднее арифметическое положительных элементов матрицы, стоящих выше главной диагонали.
Grisha248 вне форума Ответить с цитированием
Старый 22.05.2009, 11:55   #2
danekne
Форумчанин
 
Регистрация: 12.02.2007
Сообщений: 360
По умолчанию

Код:
s:=0;
flag:=0
for i:=1 to n do
for j:=i+1 to n do
if a[i,j]>0 then 
begin
sum:=sum+a[i,j];
flag:=flag+1;
end;
rez:=sum/flag;
Гдей то так. n- число элементов массива, a- массив. Извините, за неточности - паскаля под рукой нету

Последний раз редактировалось Stilet; 22.05.2009 в 12:11.
danekne вне форума Ответить с цитированием
Старый 22.05.2009, 17:37   #3
Grisha248
Пользователь
 
Регистрация: 21.05.2009
Сообщений: 15
По умолчанию

Cпасибо за помощь
Grisha248 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вычислить сумму элементов главной и побочной диагонали двумерного массива , найти среднее арифметическое neBu4kaMaXiM Помощь студентам 7 24.02.2009 15:58
вычислить номер и величину максимального элемента массива, произведение элементов, среднее арифметическое Romer9999 Паскаль, Turbo Pascal, PascalABC.NET 6 19.01.2009 16:35
Вычислить и запомнить суммы положительных элементов каждой строки матрицы kiko Паскаль, Turbo Pascal, PascalABC.NET 1 13.12.2008 17:32
Матрицы. Найти среднее арифметическое Waia Помощь студентам 1 06.11.2008 17:22
Дана целочисленная квадратная матрица... kitty Помощь студентам 1 05.12.2007 07:40