|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
23.04.2009, 00:23 | #1 |
Форумчанин
Регистрация: 04.02.2009
Сообщений: 141
|
проверьте плз код!можно ли его оптимизировать или упростить?
доброго времени бодрствания!Задача: Дан 2мерный массив a размерностью 5*5. Заполнить одномерный массив b по след.-ему правилу: если сумма очередной строки массива чётная,то соответствующий элемент массива равен 2,иначе-элемент массива b равен 1.Вычислить факториал от количества элементов массива равных 2.
Код:
Последний раз редактировалось Stilet; 23.04.2009 в 10:22. |
23.04.2009, 00:38 | #2 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Подобные куски:
Код:
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
23.04.2009, 00:45 | #3 |
Пользователь
Регистрация: 15.04.2009
Сообщений: 28
|
вот что получилось.....
кстати у вас была ошибка....вам нужно факториал по заданию считать от количества элементов равных 2, т.е. если элементов=2 получилось 3 то нужно вам 3!...а он программа в вашем тексте делает 2+2+2 и считает уже 6!....ошибка...вот исправленный и чуть укороченный код... Код:
Последний раз редактировалось Stilet; 23.04.2009 в 10:22. |
23.04.2009, 10:40 | #4 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Такая оптимизация подойдет?
Код:
I'm learning to live...
|
23.04.2009, 15:53 | #5 |
Форумчанин
Регистрация: 04.02.2009
Сообщений: 141
|
спасибо!!!!
|
23.04.2009, 20:07 | #6 |
Форумчанин
Регистрация: 04.02.2009
Сообщений: 141
|
Немогли бы вы пояснить несколько моментов из этого куска? процедура inc увеличивает s c первоначальным значением 0 на кол.-во значений j столбцов массива а.И потом проверяется условие,то что чётно.?
count := 0; for i:=1 to n do begin s := 0; for j:=1 to n do inc(s,a[i,j]); if not odd(s) then begin b[i] := 2; inc(count); end else b[i] := 1; end; |
23.04.2009, 20:12 | #7 | ||
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Цитата:
s - сумма текущей строки. Цикл Код:
Цитата:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
||
23.04.2009, 20:40 | #8 |
Форумчанин
Регистрация: 04.02.2009
Сообщений: 141
|
гениально! этот ведь ход подойдёт и для матрицы большей размерности?
|
23.04.2009, 20:42 | #9 | |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Цитата:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
|
23.04.2009, 20:48 | #10 |
Форумчанин
Регистрация: 04.02.2009
Сообщений: 141
|
такие грамотные методы нужно называть в честь создателя!)
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Title на форме. Как можно перерисовать caption на form? Или убрать его и вместо использовать картинки | Шульц | Общие вопросы Delphi | 37 | 02.10.2010 09:46 |
Помогите упростить код | Ralf_ru | Помощь студентам | 7 | 01.04.2009 17:17 |
Оптимизировать код. | Манжосов Денис :) | Общие вопросы Delphi | 1 | 20.10.2008 19:06 |
Оптимизировать код | NeiL | Помощь студентам | 2 | 21.02.2008 08:57 |