Форум
» Назад на решение задач по физике и термеху
Регистрация | Профиль | Войти | Забытый пароль | Присутствующие | Справка | Поиск

» Добро пожаловать, Гость: Войти | Регистрация
    Форум
    Информационные технологии
        Турбо Паскаль. Программирование на Pascal
Отметить все сообщения как прочитанные   [ Помощь ]
» Добро пожаловать на форум "Информационные технологии" «

Переход к теме
<< Назад Вперед >>
Несколько страниц [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 ]
Модераторы: paradise, KMA
  

Abror


Удален

А я же не смогу их записать в строчку например 1345831
А потом их надо в разделе var обозночать

Всего сообщений: N/A | Присоединился: N/A | Отправлено: 16 апр. 2006 19:45 | IP
KMA



Долгожитель

А в чем проблема тогда, возьми, да и сравни строчки в этом string, Т. е. совпадают ли первые две буковки и этих рабочих, если да, то вывести...

В строчку ты можешь записать число, LongInt вроде подойдет, а потом простенько div и mod отсчепляешь по цифорке и сравниваешь...  

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 16 апр. 2006 22:25 | IP
Guest



Новичок

Вот моя задача
1.Дана последовательность слов. Напечатать все слова последовательности, которые встречаются в ней по одному разу.
Вот что я пробовал сделать:
Var
a:string;
begin
writeln(‘Vvedite slova:’);
readln(a)
Конечно, то что я напечатал может и 9 классник. Дальше я думал как же сравнивать слова, по длине, я понимаю, они могут совпадать, тут я додумался что надо сравнивать по символам, например для себя я это понял так «КОШКА» «КОШКА» «ДОМ» «СВЕТ» «ЗАРЯ» «ЗАРЯ» и по идее он должен вывести «дом» и «свет», если я правильно понял условие задачи, но как реализовать алгоритм сравнения слов?. Я прочитал про процедуры работы со строками(Delete, Copy, Insert), но я думаю что тут надо использовать циклы. Как это сделать?

Всего сообщений: Нет | Присоединился: Never | Отправлено: 16 апр. 2006 22:53 | IP
Genrih


Удален

Ну а как же без цикла(ов) то ?

Всего сообщений: N/A | Присоединился: N/A | Отправлено: 17 апр. 2006 0:10 | IP
KMA



Долгожитель

Guest
Простеньким перебором тебя не устроит??? Или что-нибудь по круче??? Например сравниваешь первое слово со всеми остальными, если есть похожие, то удаляешь их всех, потом второе с другими, опять же если есть похожие, то удаляешь все эти слова, и так, в конце по любому остаются слова, которые встречаеются всего один раз.... Поближе к коду надо???
Даже девятиклассник может решить эту задачу, в том числе и я, просьба не оскорблять возраст...

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 17 апр. 2006 1:53 | IP
Abror


Удален


Цитата: KMA написал 17 апр. 2006 0:25
А в чем проблема тогда, возьми, да и сравни строчки в этом string, Т. е. совпадают ли первые две буковки и этих рабочих, если да, то вывести...

В строчку ты можешь записать число, LongInt вроде подойдет, а потом простенько div и mod отсчепляешь по цифорке и сравниваешь...  



Никак не могу догадаться не поможешь??Заранее спасибо!

Всего сообщений: N/A | Присоединился: N/A | Отправлено: 17 апр. 2006 12:27 | IP
Guest



Новичок

KMA , да, если можно, то поближе к коду

Всего сообщений: Нет | Присоединился: Never | Отправлено: 17 апр. 2006 13:24 | IP
miss_graffiti


Долгожитель

Abror, как в var обозначать - я написала...
в строчку? зачем тебе это?
просто вывести на экран?
это без проблем.

KMA, у него сказано: при сравнении использовать массив.

Всего сообщений: 670 | Присоединился: сентябрь 2005 | Отправлено: 17 апр. 2006 17:17 | IP
KMA



Долгожитель

miss graffiti, я ему отвечал на его реализацию, а не на саму задачу, понятное дело, что ваше предложение самое рациональное... Я бы то же стал так делать не задумываясь, в общем Arbor сделать лучше так, объявить надо следующим образом:
var phone: array[1..7] of byte;

В самой проге вывод в строчку:
for i:=1 to 7 do
write (g.phone{i});
Если конечно учитывать твое, ну а сравнить я думаю теперь и ты сможешь, просто создаешь дополнительную переменную, и каждый раз сравниваешь две цифры, у номера телефона...




(Сообщение отредактировал KMA 18 апр. 2006 0:32)

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 17 апр. 2006 23:59 | IP
Guest



Новичок

KMA
Помоги все таки с задачей пожалуйста. Это я про строки. Нужен алгоритм вот  "сравниваешь первое слово со всеми остальными, если есть похожие, то удаляешь их всех, потом второе с другими, опять же если есть похожие, то удаляешь все эти слова, и так, в конце по любому остаются слова, которые встречаеются всего один раз". Если не сложно, то помоги пожалуйста.

Всего сообщений: Нет | Присоединился: Never | Отправлено: 18 апр. 2006 0:09 | IP

Эта тема закрыта, новые ответы не принимаются

Переход к теме
<< Назад Вперед >>
Несколько страниц [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 ]

Форум работает на скрипте © Ikonboard.com