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

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

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

2 страниц V < 1 2  
Closed Topic Открыть новую тему 
> Строки и задачки с ними, запуталась, мож совет дадите
сообщение
Сообщение #21


Ищущий истину
******

Группа: Пользователи
Сообщений: 4 825
Пол: Мужской
Реальное имя: Олег

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


Кстати вот что я нашел у меня (старая лаба еще из ФМШ) :
Код
var
s:string;
b:set of char;
c:char;
begin
readln(s); s[succ(ord(s[0]))]:=chr(0);
for c:=chr(1) to s[0] do if not(s[ord(c)] in b) then begin include(b,s[ord(c)]); inc(s[succ(ord(s[0]))]) end;
writeln(ord(s[succ(ord(s[0]))]))
end.

Программа выдает количество различных букв в строке....


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #22


Гость






Не стал создавать ещё одну тему. Результаты поиска дали ПОЧТИ то, но не то smile.gif
Так вот: Существует фаил с текстом. Предположим, text.dat. В нём нужно найти самую длинную строку, выровнять весь текст по ней и записать в фаил, допустим, vxod.dat. Дело в том, что со строками особо не работал, а разобраться с функциями времени нет(ну как всегда у студентов "пока гром не грянет..." smile.gif ). Помогите, пожалуйста.
 К началу страницы 
+ Ответить 
сообщение
Сообщение #23


Гость






Цитата(Diger @ 31.01.2006 9:09)
Не стал создавать ещё одну тему. Результаты поиска дали ПОЧТИ то, но не то smile.gif

Вот и приведи ссылку на то, что ты нашел, с описанием того, ЧТО именно тебя не устроило... Или за тебя еще найти надо?

Кстати, ты думаешь в том, что кто-то из нас напишет, будет намного легче разобраться, чем в функциях/процедурах работы со строками? laugh.gif Мы не изобретаем велосипеды заново, а активно пользуется готовыми наработками, и специально для тебя разжевывать алгоритм или переписывать рабочую функцию "чтобы без <этого> и вот <этого>" (нужное подставить) никому не нужно...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #24


Гость






Цитата(volvo @ 31.01.2006 10:16) *

Вот и приведи ссылку на то, что ты нашел, с описанием того, ЧТО именно тебя не устроило... Или за тебя еще найти надо?

Кстати, ты думаешь в том, что кто-то из нас напишет, будет намного легче разобраться, чем в функциях/процедурах работы со строками? laugh.gif Мы не изобретаем велосипеды заново, а активно пользуется готовыми наработками, и специально для тебя разжевывать алгоритм или переписывать рабочую функцию "чтобы без <этого> и вот <этого>" (нужное подставить) никому не нужно...

1.) Доброе утро! smile.gif Любезно, конечно, но копировать сюда ссылки с подробными комментариями, на мой взгляд, лишнее.
2.) Век открытий закончился вместе с концом 19ого и началом 20ого=) Все остальные "конструкции", в той или иной сфере, составлены из того, что уже под рукой имеется. И я прекрасно понимаю, что ничего нового не произойдёт, если мне помогут с этой программой. Единственное, чем поможет мой случай форуму - быть может, кто то наберёт в поиске ключевые слова этой задачки, найдёт её и не создаст тему, ответом на которую будет банальный копи-паст ссылки smile.gif
3.) Я не сижу закинув ноги на стол с бутылкой пива и не жду, пока мне всё напишут. Я тоже сейчас работаю с примерами в то йили иной мере, касающихся моей задачки. Я же не потребовал, я попросил, сказал пожалуйста. Если это действительно так сложно что ты не знаешь, как сделать или так просто, что не хочется писать, я не заставляю, я прошу. Но опять таки, тебе может это и просто, а я вот не разобрался.
4.) ну и последнее: за мной не заржавеет.
 К началу страницы 
+ Ответить 
сообщение
Сообщение #25


Гость






Может это был намёк, на то, что такая тема есть? smile.gif Щас попробую повнимательнее посмотреть.

Diger, вместо того, чтобы умничать, ты бы лучше свой же пост ВНИМАТЕЛЬНО перечитал, и сказал, ГДЕ ты подразумевал, что
Цитата
Результаты поиска дали ПОЧТИ то, но не то
... Если у нас на форуме, то мог дать ссылку, если на чужом - почему пошел против правил и НЕ воспользовался нашим поиском, прежде чем запостить вопрос?


Сообщение отредактировано: volvo -
 К началу страницы 
+ Ответить 

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

 





- Текстовая версия 19.02.2025 14:38
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name