|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
12.01.2017, 10:26 | #1 |
Новичок
Джуниор
Регистрация: 12.01.2017
Сообщений: 2
|
Pascal. Составить процедуру.
Помогите пожалуйста, кто сможет. Задание: "Составить процедуру, вычисляющую суммы элементов главной диагонали квадратной матрицы. Применить данную процедуру для заданных матриц c(n,n) и p(m,m)." Программа в целом работает, но нужно её разбить на 2 процедуры: процедуру вычисления и процедуру вывода, не знаю как это сделать.
|
12.01.2017, 11:04 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
во-первых, нужно выложить на форум код программы, а не картинку.
во-вторых, если вы написали программу с процедурой vvod - где заполняете матрицу случайными числами, выводите её на экран, вычисляете сумму и выводите результат, то что Вам мешает выделить нужные участки кода в отдельные процедуры? в-третьих, вычисление суммы организовано КРАЙНЕ неэффективно. посмотрите, Вы же перебираете все N*N элементы, хотя нужно перебрать всего N элементов. т.е. вместо двух вложенных циклов for и проверки if i=j then достаточно: Код:
|
12.01.2017, 11:48 | #3 |
Новичок
Джуниор
Регистрация: 12.01.2017
Сообщений: 2
|
Понял, спасибо. разбить на отдельные участки разбил, но вот в ответе нули появились
|
12.01.2017, 12:03 | #4 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Составить процедуру замены в паскаль | katyawapka | Помощь студентам | 4 | 24.01.2014 09:12 |
MS-Exel, VBA. составить процедуру-функцию построения матрицы. | Elly_Dorian | Помощь студентам | 0 | 14.05.2013 15:25 |
Pascal.Используя процедуру sort_file ,составить программу сортировки текстового файла | Артур Артурович | Помощь студентам | 3 | 13.01.2013 22:22 |
составить подпрограмму-процедуру для вычисления матрицы | bananklubnika | Помощь студентам | 1 | 30.05.2010 23:22 |
Процедуру и функцию помогите составить плиз | Oleg36 | Помощь студентам | 2 | 26.12.2008 11:27 |