|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
23.10.2008, 22:36 | #1 |
Студент
Пользователь
Регистрация: 30.05.2008
Сообщений: 61
|
Паскаль и массивы
прога состоит из 2-х частей,с первой разобрался а во 2-о1 вот что:
Дана программа,которая в целочисленной матрице в столбцах с нечетными номерами находит номер столбца,в котором максимальное количество четных положительных чисел вот что у меня получилось(отрывок),но почему то не получается: <code> //подсчет номера нечетного столбца с максимальным количеством четных положительных чисел while j<=4 do begin for i:=1 to 4 do begin if i mod 2=0 then//если столбец нечетный begin for j:=1 to 4 do if mas[i,j]>0//если элемент больше 0 then begin mas[i,j]:=k; if k mod 2 <>0 //если элемент четный then n2:=n2+1; end; end; end; if max<n2 then begin max:=n2; end; j:=j+2; end; writeln('max=',max); end.</code> |
23.10.2008, 22:43 | #2 | ||
Форумчанин Подтвердите свой е-майл
Регистрация: 22.01.2008
Сообщений: 161
|
Цитата:
Аналогично в этой строке Цитата:
|
||
23.10.2008, 23:15 | #3 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Раз Вы пишете mas[i,j], значит i - строки, j- столбцы, Вы же считаете все наоборот. Если нам надо что-то посчитать в столбцах, то они идут внешним циклом, а строки внутренним.
Код:
|
23.10.2008, 23:20 | #4 | |
Студент
Пользователь
Регистрация: 30.05.2008
Сообщений: 61
|
Цитата:
вот только что меня интересует ...and (a[i,j] mod 2=0) then.... необходимо будет создать еще один массив или это опечатка ? Зы:а матрицу я взял такую,чтобы значения долго не вводить(в реальности она 10х10) |
|
23.10.2008, 23:23 | #5 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Конечно опечатка, просто я так обычно пишу, ну и по привычке здесь написал.
Задавайте матрицу рандомно. Последний раз редактировалось puporev; 23.10.2008 в 23:25. |
24.10.2008, 16:52 | #6 | |
Студент
Пользователь
Регистрация: 30.05.2008
Сообщений: 61
|
Цитата:
|
|
24.10.2008, 17:14 | #7 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
При чем тут Паскаль. У вас наверно массив вещественного типа. Переделайте на mas:array[1..4,1..4] of integer;
|
24.10.2008, 17:20 | #8 |
Студент
Пользователь
Регистрация: 30.05.2008
Сообщений: 61
|
точно,спс puporev
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Паскаль. массивы | }{oTT@БЬ)Ч™ | Помощь студентам | 9 | 07.12.2015 20:00 |
Паскаль. задачи на массивы | rant | Помощь студентам | 27 | 20.04.2010 09:33 |
Паскаль. Массивы | Sexy Fox | Помощь студентам | 5 | 12.04.2008 21:45 |
Паскаль. Динамич массивы | ProPaL | Помощь студентам | 6 | 25.03.2008 09:43 |
Паскаль, массивы. | SZero | Помощь студентам | 5 | 22.03.2008 16:06 |