 Массив, ППЦ( |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| TeRmInWeB |
 22.12.2007 16:57
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 21 Пол: Мужской Реальное имя: Юра Репутация:  0   |
В массиве Т(25) сделать все четные числа отрицательными, а для не четных подсчитать количество и сумму! как? и чего с этим делать непойму(!
|
   |
 
|
  |
Ответов
| andriano |
23.12.2007 12:06
Сообщение
#2
|
|
Гуру Группа: Пользователи Сообщений: 1 168 Пол: Мужской Реальное имя: Сергей Андрианов Репутация: 28 |
Вообще-то в Паскале специально для проверки на четность существует функция Odd. Можно, конечно, то же самое делать посредством арифметических (как предложено в предыдущем посте) или логических (MyOdd := boolean(MyNumber and 1);), но для наглядности кода применение специально для этого предназначенных функций выглядит явно предпочтительнее.
|
|
|
|
Сообщений в этой теме
TeRmInWeB Массив 22.12.2007 16:57
Артемий Покажи что пробовал. 22.12.2007 17:23 TeRmInWeB в том то и дело я незнаю как его написать надо сво... 22.12.2007 23:34 мисс_граффити ну например так (заполняется случайными числами):
... 23.12.2007 0:30
Тёмный Эльф В массиве Т(25) сделать все четные числа отрицател... 23.12.2007 2:11 TeRmInWeB Спасибо огромнейшее я попробую) не правдо спс что ... 23.12.2007 12:12 Зюзюка Если все объеденить выше сказанное получится чтото... 23.12.2007 12:15 TeRmInWeB Блин народ супер уже начал писать обязательно попр... 23.12.2007 12:18 volvo Зюзюка, а вот теперь запусти свою программу. Мне и... 23.12.2007 12:23 Зюзюка Незнаю, т.к у меян даже паскале нету :) :) :) 23.12.2007 12:27 TeRmInWeB Я написал комплит вроде работает ошибок нет но сам... 23.12.2007 12:37 Client RadKey или Readln в конце поставил? 23.12.2007 12:41 Зюзюка Так как объединял 2 несвоих кода конечно же были о... 23.12.2007 12:45 TeRmInWeB сейчас погодите исправлю а то чегот 2 раза перепис... 23.12.2007 12:57 TeRmInWeB народ а как сделать чтоб массив не автоматом задав... 23.12.2007 13:48 Тёмный Эльф
народ а как сделать чтоб массив не автоматом зада... 23.12.2007 14:07 TeRmInWeB спс сейчас напишу
Добавлено через 4 мин.
отличн... 23.12.2007 14:08 Тёмный Эльф
для это надо так:
USES CRT; (перед var)
в начале... 23.12.2007 14:26 compiler исправил ошибку Зюзюки или комипилируется и хорошо... 23.12.2007 14:30 TeRmInWeB Тёмный Эльф спасиб сейчас напишу) а то уже места н... 23.12.2007 14:31 TeRmInWeB блин я и uses crt и clrscr попробовал а ошибка по... 23.12.2007 15:09 Client Покажи полностью код, чтоб увидели (мы не телепаты... 23.12.2007 15:10 TeRmInWeB program m;
const n=25;
var mas: array of integer;... 23.12.2007 15:26 Client program m;
uses crt;
. . .
begin
clrscr;
. ... 23.12.2007 16:07 TeRmInWeB сейчас попробую)
Добавлено через 10 мин.
Заши... 23.12.2007 16:11 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 13.12.2025 18:45 |