|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
26.11.2008, 20:10 | #1 |
ICQ: 25-100-400
Регистрация: 26.11.2008
Сообщений: 9
|
Обработка Матриц(Условие -5<Zij<15 ; Упорядочивание Элементов,Вывод На Экран Матриц)
Дана Матрица Z(4,6)Нужно Упорядочить по убыванию элементы каждого столбца матрицы. Вывести на экран исходную и полученную матрицы в общепринятом виде. При Условии, что -5 ≤ Zij ≤ 15 А Также При Условии, что Элементы матрицы надо ввести в программе с клавиатуры. При Решении Лучше Использовать Алгоритмизацию и Программирование структур со вложенными циклами, Приемы программирования во вложенных циклах, Способы Ввода и Вывода Матриц. (Это Так в Условии, т.е. в Цели Лабораторной Работы Написано) Там Дан Пример выполнения работы(Но Этот Пример На Другую Тематику) Задание: найти сумму и количество положительных элементов главной диагонали матрицы A(10х10). Var I, J, K: Integer; A: Array [1..10,1..10] of Real; S: Real; Begin For I:=1 to 10 do For J:=1 to 10 do Begin Write(‘Введите ‘,J,’-й элемент’,I,’-ой строки массива : ’); ReadLn(A[I,J]); End; S:=0; K:=0; For I:=1 to 10 do Begin If A[I,I]>0 Then Begin S:=S+A[I,I]; K:=K+1; End; End; WriteLn(‘Сумма элементов главной диагонали матрицы=’,S:4:3,’ количество=’,K); End. ПОЖАЛУЙСТА, ПОМОГИТЕ РЕШИТЬ ДАННУЮ ЗАДАЧУ, БУДУ ПРИЗНАТЕЛЕН ВАМ, ЗАРАНЕЕ СПАСИБО
Продаю ICQ Номера
Последний раз редактировалось timepoka; 27.11.2008 в 18:28. |
27.11.2008, 12:09 | #2 |
Пользователь
Регистрация: 25.11.2008
Сообщений: 23
|
Я сама в программировании не особо сильна, но очень хочу кому-нибудь хоть чем-то помочь.
Для упорядоченя элементов столбца можно использовать сортировку "пузырьковым методом". Я исправила ваш пример: Код:
Я точно знаю только то, что я ничего не знаю. Хотелось бы узнать еще что-нибудь.
|
27.11.2008, 17:09 | #3 |
ICQ: 25-100-400
Регистрация: 26.11.2008
Сообщений: 9
|
Ммм=) Спасибо Большое=)))
Продаю ICQ Номера
|
27.11.2008, 18:24 | #4 |
ICQ: 25-100-400
Регистрация: 26.11.2008
Сообщений: 9
|
Но Всё же как Сделать При Таком Условии, то есть Промежутке? Вывод Матриц Тоже Таков?
Продаю ICQ Номера
|
27.11.2008, 18:41 | #5 | |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Цитата:
Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
|
28.11.2008, 21:39 | #6 |
ICQ: 25-100-400
Регистрация: 26.11.2008
Сообщений: 9
|
Спасибо
Продаю ICQ Номера
|
01.07.2011, 12:56 | #7 |
Регистрация: 29.06.2011
Сообщений: 3
|
а как найти сумму элементов побочной диагонали
|
01.07.2011, 13:12 | #8 |
Пользователь
Регистрация: 03.02.2010
Сообщений: 46
|
Код:
|
01.07.2011, 13:20 | #9 | ||
Software Developer
Участник клуба
Регистрация: 01.03.2011
Сообщений: 1,098
|
Цитата:
Цитата:
Извините, низдержалси (с)
Болтовня ничего не стоит. Покажите мне код. (c) Linus Torvalds
Помог ответ? -- Поставьте отзыв. Выражения особой благодарности в рублевом эквиваленте отправлять сюда --> R269634919062 |
||
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вывод сообщения на экран при выборе из списка определенного значения | MaGistR | Microsoft Office Excel | 1 | 31.01.2008 09:10 |
Подпрограммы и обработка матриц | Pravednik | Помощь студентам | 3 | 20.01.2008 14:41 |
Перемножение матриц | Арина | Помощь студентам | 1 | 18.05.2007 19:21 |