|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.02.2019, 14:39 | #1 |
Новичок
Джуниор
Регистрация: 27.02.2019
Сообщений: 2
|
Поиск
Столкнулся с проблемой...
Пытаюсь сравнить переменную с данными в текстовом документе(что-то типо поиска... Вводится Фамилия и она сравниваетс с именами в файле, если такое есть то оно выводит его), но почему то либо переменная либо вовсе не сравнивается, либо програма выдает ответ только если фамилия будет в самом конце файла. Вот кусок кода. Код:
Последний раз редактировалось LolerFox; 27.02.2019 в 15:49. |
27.02.2019, 14:46 | #2 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
И компилируется? Там же парность begin end порушена
while not EOF(f1) do begin
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
27.02.2019, 14:53 | #3 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Первое. у Вас абсолютно ущербная логика.
зачем Вам p := 1 ?? нужен примерно такой код Код:
Второе Цитата:
Результатом сравнения будет ЛОЖЬ, если: 1) в одной из строк есть пробелы/табуляция - как в начале строки, так и в конце. 2) отличается регистр символов |
|
27.02.2019, 16:07 | #4 | |
Новичок
Джуниор
Регистрация: 27.02.2019
Сообщений: 2
|
Про р:=1 я знаю, я просто хотел проверить сравнивает ли оно вообще.(там после этого р:=1 должен был быть "write" но я его видимо случайно стер).
Цитата:
Ладно спасибо за помощь! |
|
27.02.2019, 16:12 | #5 | |
Старожил
Регистрация: 23.10.2010
Сообщений: 2,311
|
И свою копейку брошу.
Код:
Управление оператору, который следует за циклом, будет передано только после обнаружения [not EOF(f1)] конца файла. Это к Цитата:
Код:
Как-то так, ...
|
|
27.02.2019, 16:29 | #6 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите пожалуйста решить две задачки - поиск минимального значения в векторе и поиск/перестановка положительных элементов в матрице | Ruslan Rutkovsky | Паскаль, Turbo Pascal, PascalABC.NET | 6 | 12.05.2017 23:43 |
Гугл поиск отсылает на майл.ру поиск | Ципихович Эндрю | Свободное общение | 5 | 22.11.2016 11:01 |
Помощь в доработке программы на языке паскаль (бинарный поиск, поиск перебором) | DimzNOVIchok45 | Помощь студентам | 0 | 13.10.2014 20:11 |
Реализовать два метода поиска строк в массиве: поиск перебором, бинарный поиск на языке Pascal | DimzNOVIchok45 | Помощь студентам | 7 | 19.09.2014 21:40 |
Обработка одномерного массива - поиск среднего, поиск минимального, сортировка (Паскаль) | nadez | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 18.03.2014 08:45 |