Тип даных - Форум «Всё о Паскале»

Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи

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

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

Тип даных

Опции

Desktop II	4.04.2006 10:33 Сообщение #1
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	.... Сообщение отредактировано: Desktop II - 6.04.2006 12:37

volvo	4.04.2006 10:40 Сообщение #2
Гость	Цитата(Desktop II @ 4.04.2006 10:33) Как правильно написать условие что бы исключить из списка студентов у которых больше одной двойки ? Что-то такого типа: var count_2: integer; ... s1:=poch; while s1<>nil do begin count_2 := 1; for i:= 1 to 4 do if s1^.y.ocinky[i] = 2 then dec(count_2); if count_2 < 0 then { данные, на которые указывает s1, нужно удалять } s1:=s1 ^.cc; end;

GoodWind	4.04.2006 10:42 Сообщение #3
Автооответчик Группа: Модераторы Сообщений: 1 188 Пол: Мужской Реальное имя: Александр Репутация: 16	Цитата Посылочный тип даных а разве такой существует ? -------------------- Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?

Desktop II	4.04.2006 10:51 Сообщение #4
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	... Сообщение отредактировано: Desktop II - 6.04.2006 12:37

Desktop II	4.04.2006 14:14 Сообщение #5
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	... Сообщение отредактировано: Desktop II - 6.04.2006 12:38

volvo	4.04.2006 14:20 Сообщение #6
Гость	Цитата(Desktop II @ 4.04.2006 14:14) Сделал как ты сказал, после ввода даных паскаль намертво виснет... Я не это совершенно имел в виду! Смотри, что у тебя происходит: while s1<>nil do begin count_2 := 1; for i:= 1 to 4 do if s1^.y.ocinky[i] = 2 then dec(count_2); if count_2 < 0 then s1:=s1 ^.cc; { Вот так расценивается твоя программа !!! } end; Я же подразумевал, что ты ВМЕСТО комментариев вставишь код удаления элемента списка, на который указывает s1... Чувствуешь разницу?

Desktop II	4.04.2006 14:41 Сообщение #7
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	... Сообщение отредактировано: Desktop II - 6.04.2006 12:38

volvo	4.04.2006 14:45 Сообщение #8
Гость	Цитата If <Что тут писать ?> then Delete(s1); То же самое и писать!!! If count_2 < 0 Then Delete(s1) else s1 := s1^.cc; Только нужно еще реализовать процедуру Delete...

Desktop II	4.04.2006 14:59 Сообщение #9
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	... Сообщение отредактировано: Desktop II - 6.04.2006 12:38

volvo	4.04.2006 15:10 Сообщение #10
Гость	Поиском пользуйся. Да и FAQ мы не для красоты месяцами шлифуем... Чтобы ты пришел, и для тебя все заново решать...

Desktop II	4.04.2006 15:22 Сообщение #11
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	... Сообщение отредактировано: Desktop II - 6.04.2006 12:38

Desktop II	5.04.2006 20:54 Сообщение #12
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	... Сообщение отредактировано: Desktop II - 6.04.2006 12:39

volvo	5.04.2006 21:05 Сообщение #13
Гость	Цитата Я как раз и тем и дургим пользуюсь. Правда? Так что же ты разобраться не можешь, ПОЧЕМУ у тебя ошибка? А посмотреть на описание НАШЕГО типа Point тебе что, лень было? Или мы должны исключительно по твоему образу и подобию в FAQ-е использовать названия полей, не несущих НИКАКОЙ смысловой нагрузки? Будь добр перечитать тему о списках еще раз. И не надо делать "Up", иначе тема уйдет в Down раз и навсегда...

Desktop II	5.04.2006 21:09 Сообщение #14
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	... Сообщение отредактировано: Desktop II - 6.04.2006 12:39

Desktop II	6.04.2006 9:38 Сообщение #15
Новичок Группа: Пользователи Сообщений: 31 Пол: Мужской Репутация: 0	... Сообщение отредактировано: Desktop II - 6.04.2006 12:39

« Предыдущая тема · Задачи · Следующая тема »

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

Пользователей: 0

Режим отображения: Стандартный · Переключить на: Линейный · Переключить на: Древовидный

Подписка на тему · Сообщить другу · Версия для печати · Подписка на этот форум

Текстовая версия

20.07.2025 18:37

Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"