|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
10.05.2008, 16:12 | #11 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Вот нормально работает, только вводить аккуратно нужно, не путая данные.
Код:
|
10.05.2008, 23:46 | #12 |
Пользователь
Регистрация: 06.05.2008
Сообщений: 22
|
Спасибо-спасибо-спасибо! а если надо не только а и б буквы, а дальше до д например. надо просто тот кусочек вставить ещё с нужной букво, так?
|
11.05.2008, 13:38 | #13 |
Пользователь
Регистрация: 06.05.2008
Сообщений: 22
|
А можно ещё один вопрос. Если не сложно, посмотрите пожалуйста. Вот задача на двунаправленные списки, но там указывает на ошибку в этой вот строчке. что там опять не так???
Дан список слов. Подсчитать кол-во верных равенств среди S1=S(n), S2=S(n-1), где Si-элемент списка. Type TLisp=^TNode; TNode=record pred:TLisp; info:string; next:TLisp; end; Var p,h,g:TLisp; s:string; k:integer; begin writeln('vvedi s'); readln(s); new(p); p^.info:=s; p^.pred:=nil; p^.next:=nil; readln(s); while s<>0 do begin new(q); q^.info:=s; q^.pred:=p; q^.next:=nil; p:=q; readln(s); end; k:=0; p^.pred:=p^.info; p^.next:=q^.pred; while p<>q do begin if (p^.pred=q^.next) and (p^.next=q^.pred) then k:=k+1; end; writeln(k); end. |
11.05.2008, 15:44 | #14 | |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
1. Можно все классы с 1 по 11 и все буквы от а до я, если не лень писать.
2. Цитата:
if s<>'' then begin, или if length(s)>0 then begin 3. В переменных объявлена g, а в тексте q. 4.Ошибка в строке p^.pred:=p^.info; разные типы Tlist и string. Как правильно, я не знаю, поскольку с указателями и списками не дружу. |
|
11.05.2008, 15:46 | #15 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Во время отправки ответа завис сайт и получилось два ответа, увидел только сегодня.
Последний раз редактировалось puporev; 12.05.2008 в 07:57. |
12.05.2008, 20:14 | #16 |
Пользователь
Регистрация: 06.05.2008
Сообщений: 22
|
Спасибо Вам большое, что так много внимания уделяете моим задачам!
|
12.05.2008, 22:04 | #17 |
Пользователь
Регистрация: 06.05.2008
Сообщений: 22
|
Можете ещё с одной вот помочь.
//Один вопрос - одна тема. Закрыто. Alex21 Последний раз редактировалось Alex21; 14.05.2008 в 09:43. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
помогите решить задачи!!! | black_soul | Фриланс | 13 | 21.07.2008 09:22 |
Помогите решить задачи | Andyst | Помощь студентам | 3 | 25.12.2007 15:14 |
ПОМОГИТЕ РЕШИТЬ ЗАДАЧИ С++ | lawny | Фриланс | 1 | 24.12.2007 20:58 |
Помогите решить две задачи на С/С++ | Сема | Помощь студентам | 3 | 24.12.2007 07:31 |
Помогите решить задачи! | Вилен | Помощь студентам | 2 | 10.10.2007 23:12 |