IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Задача с массивом..., Определить эл-ты делящиеся на 4...
ghost
сообщение 28.10.2004 15:04
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 23
Пол: Мужской

Репутация: -  0  +


В массиве B(20) определить элементы, делящиеся на 4 без остатка, и сформировать из них новый массив C, подсчитав количество таких
элементов и минимальный и максимальный среди них.
blink.gif
Помогите решить задачу, пожалуйста.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
ghost
сообщение 24.11.2004 17:27
Сообщение #2


Новичок
*

Группа: Пользователи
Сообщений: 23
Пол: Мужской

Репутация: -  0  +


Большое спасибо, но у меня появилась ещё пара вопросов.

Напишите пожалуйста описание идентификаторов.

Как сделать так, чтобы если введут число не из данного диапозона или введут букву, то появлялось бы надпись, которая сообщала что это не правильно и надо так-то...?

Сообщение отредактировано: ghost - 24.11.2004 17:28
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
ghost   Задача с массивом...   28.10.2004 15:04
Atos   :blink: У-у, какая сложная и непонятная задача...   28.10.2004 15:31
Atos   Ладно, шутю... type TElem=byte;     Ar...   28.10.2004 15:33
Лита   Uses crt; const n=20; Var b,c:array [1.....   28.10.2004 15:48
Лита   а если в массиве нет отрицательных элементов? а в...   28.10.2004 15:52
volvo   Лита Тогда так: min:=maxint; max:=-maxin...   28.10.2004 15:54
Лита   ну можно и так... <_< так даже попроще... ...   28.10.2004 16:25
Atos   :huh: Согласен, недосмотрел...   28.10.2004 18:00
ghost   Спасибо всем, что помогли=) Добавлено (2.11.04 14...   30.10.2004 15:48
Гость_Лита   :huh: ну как все обыкновенные блок-схемы... :D ...   2.11.2004 15:16
APAL   Ничего смешного. У нас есть возможность вставки р...   2.11.2004 15:27
ghost   Или можно на мыло мне кинуть.   2.11.2004 20:27
Лита   хе... признаю свою оплошность, не посмотрела, что...   3.11.2004 1:56
Лита   Вот... щас попробую прикрепить блок-схему... [b]т...   3.11.2004 2:31
ghost   Немного пределанная прога Uses crt; const n=20;...   12.11.2004 12:39
APAL   В блок-схеме замени b[i]:=random(40) на Readln(b[...   12.11.2004 12:44
ghost   Ну а в самой проге что надо изменить? И ещё, в пе...   12.11.2004 12:48
APAL   То что надо изменить я уже обозначил.   12.11.2004 13:40
Лита   В самой программе меняешь тоже самое: b[i]:=rando...   12.11.2004 13:53
ghost   После замены в проге, можно вводить самому массив ...   13.11.2004 12:39
Лита   Ну, во-первых там надо было убрать строку write(b:...   14.11.2004 5:41
ghost   Большое спасибо, но у меня появилась ещё пара вопр...   24.11.2004 17:27
Лита   Описание идентификаторов я уже писала: Uses crt;...   24.11.2004 18:06
volvo   Лита А если без Goto? var ToDo: Boolean; ... Repe...   24.11.2004 18:16
Лита   Можно и без GoTo... ;)   24.11.2004 18:22
ghost   Под описанием я имел в виду, для чего он(идентифик...   24.11.2004 18:32
volvo   ghost Во первых, в переменную типа Integer нельзя...   24.11.2004 19:01
ghost   Ничего не могу понять, куда чего :blink: Не мог ...   24.11.2004 19:45
volvo   ghost Смотри пост выше...   24.11.2004 19:57
ghost   Не работает "защита от дурака" :( При ...   24.11.2004 20:09
GoodWind   по моему так: if not ((next > -32768) and (nex...   24.11.2004 20:12
volvo   GoodWind Прав 100%. Я просто не исправил. Сейчас ...   24.11.2004 20:31
ghost   Спасибо, помогло :rolleyes: Но теперь в массив А ...   24.11.2004 20:47
volvo   Не вводится больше 20... вводится ровно 20, исключ...   24.11.2004 20:48
ghost   В том сообщении, где вы исправляли программу, на о...   24.11.2004 20:59
volvo   ghost Ничего подобного - я еще раз перепроверил п...   24.11.2004 21:09
ghost   Хихи, странно, перед тем как написать предыдущее с...   24.11.2004 21:17
ghost   Помогите пожалуйста Совсем забыл про блок схему. В...   30.11.2004 18:20
volvo   ghost А для чего в программе пишется: const n=20;...   13.12.2004 13:38
Лита   volvo ага, вот только еще удостоверится, что масс...   13.12.2004 16:47
volvo   Лита Я по-другому не пишу... (и Вам не советую) ...   13.12.2004 17:13
ghost   Нет, я имел в виду, чтобы прога спрашивала у юзер...   13.12.2004 21:57
volvo   ghost Тогда измени самое начало программы вот так...   13.12.2004 22:44
mithquessir   Есть как минимум два способа, чтобы 1. Меняешь: ...   13.12.2004 22:46
volvo   mithquessir :nono: Неверно... Не нужно вводить ко...   13.12.2004 22:49
mithquessir   Упс. :blink: Опечатка Исправил   13.12.2004 22:59
ghost   Big thx :)   14.12.2004 14:31
ghost   Спасите меня с блок схемой плз, никак не получаетс...   22.12.2004 19:56


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 18.07.2025 17:55
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"