Чтение из файла, нужна помощь

[capta1n]

когда вы читаете с консоли, тобишь экран+клавиатура, в терминале, тогда вы можете задавать сколь угодно вводимых значений, потому что тогда компьютер понимает, сколько ему нужно принять данных, введенных пользователем

Вот внимательно перечиатйте то, что я написал - где здесь я не говорю о том, что с консоли будет читаться и обрабатываться по-другому - я говорю о том, что в терминале считывается каждое определенное значение процедуройй readln - вы можете задать readln ( a, b, c, d ) и он у вас будет принимать 4 значения, пока вы их не введете, а с текстовыми файлами так работать нельзя - читать из тектового файла можно только в одну переменную.
PS: Всем бы лишь опровергнуть, нежели нормально прочитать, что человек имел в виду

[Serge_Bliznykov]

capta1n, я поэтому и обратил Ваше внимание на то, что Вы ошибаетесь!!
МОЖНО ТАК ЧИТАТЬ ИЗ ТЕКСТОВОГО ФАЙЛА!
В любой действующей программе можно заменить Read(X,Y,Z) (или ReadLn(X,Y,Z) )
на Read/ReadLn(F, X,Y,Z) - где F - это текстовый файл!!!!

Вот, посмотрите приложенный пример.

Внимание. Текстовый файл так сделан с форматированием (как текстовая таблица). Я писал об этом в своём предыдущем сообщении..


P.S. RgnRok - Вы тоже обязательно посмотрите пример. Может такой способ Вам больше понравится ;-)

[capta1n]

просто так не получится читать!
Обязательно нужно читать строчку из файла в строковую переменную, а дальше выделять нужные куски через Pos() и Copy()...
пишу так, приблизительно:
Код:
var
s : string;
k : integer;
...
i :=0 ;
while not eof(f) do
begin
readln(f,s);
if Pos('.',s)>3 then begin
i := i + 1;
a[i].surname := Copy(s,1,Pos('.',s)-3);
a[i].NameLetter := Copy(s,Pos('.',s)-2,2);
Delete(s,1,Pos('.',s));
Val(Copy(s,1,Pos(' ',s)-1,a[i].bal1,k);
Delete(s,1,Pos(' ',s));
Val(Copy(s,1,Pos(' ',s)-1,a[i].bal2,k);
Delete(s,1,Pos(' ',s));
Val(s,a[i].bal3,k);
end;
end;

Тогда не понимаю, зачем вы написали вот это и почему вы это написали, знав, что читать так можно из файла, а вы предложили другой вариант, сказав

просто так не получится читать!
Обязательно нужно читать строчку из файла в строковую переменную, а дальше выделять нужные куски через Pos() и Copy()...

[Serge_Bliznykov]

Тогда не понимаю, зачем вы написали вот это и почему вы это написали, знав, что читать так можно из файла, а вы предложили другой вариант, сказав

Поймите, обычно любую задачу можно решить кучей разных способов... Все они имеют как положительные, так и отрицательные стороны!

Применительно к данной задаче, можно сделать либо:

Подход 1: усложнить программу, но она будет читать любой текстовый файл (с любым форматированием, главное, чтобы после имени была обязательно точка, были числа и они разделялись пробелами). Причём, её несложно изменить так, чтобы она сказала, какая часть строки не обрабатывается и почему (например, там не числовое значение)... Но за этот подход приходится платить сложностью программного кода.

Подход 2: Программный код чтения максимально упрощён. Прямо в коде мы задаём сколько символов мы берём из файла в качестве имени, числа должны отделяться пробелом(-ами).
Плата за эту простоту - попробуйте между числа вставить какой-нибудь знак... он, естественно, не сможет быть корректно быть преобразован в число, в результате получите ошибку runtime error 106 и программа завершит свою работу... Для реальной жизни подобная ситуация НЕДОПУСТИМА! Потому что где, в какой строке и какую ошибку искать - абсолютно неясно.
Кроме того, этот подход требует ОБЯЗАТЕЛЬНО правильного форматирования исходного текстового файла. А далеко не всегда программист может влиять на то, в каком виде должны быть обрабатываемые программой данные.
Хотя, иногда и такой подход применим...
всё зависит от конкретной ситуации...

ну вот. Надеюсь, что раскрыл тему...

[RgnRok]

Большое спосибо за 2 вариант. Для дела конечно лучше использовать 1 вариант кода, но так как данная задача является просо заданием для практики, то нестоит сильно усложнять работу, и легче взять просто 2 код.

[capta1n]

Сообщение от Serge_Bliznykov

Поймите, обычно любую задачу можно решить кучей разных способов... Все они имеют как положительные, так и отрицательные стороны!

Применительно к данной задаче, можно сделать либо:

Подход 1: усложнить программу, но она будет читать любой текстовый файл (с любым форматированием, главное, чтобы после имени была обязательно точка, были числа и они разделялись пробелами). Причём, её несложно изменить так, чтобы она сказала, какая часть строки не обрабатывается и почему (например, там не числовое значение)... Но за этот подход приходится платить сложностью программного кода.

Подход 2: Программный код чтения максимально упрощён. Прямо в коде мы задаём сколько символов мы берём из файла в качестве имени, числа должны отделяться пробелом(-ами).
Плата за эту простоту - попробуйте между числа вставить какой-нибудь знак... он, естественно, не сможет быть корректно быть преобразован в число, в результате получите ошибку runtime error 106 и программа завершит свою работу... Для реальной жизни подобная ситуация НЕДОПУСТИМА! Потому что где, в какой строке и какую ошибку искать - абсолютно неясно.
Кроме того, этот подход требует ОБЯЗАТЕЛЬНО правильного форматирования исходного текстового файла. А далеко не всегда программист может влиять на то, в каком виде должны быть обрабатываемые программой данные.
Хотя, иногда и такой подход применим...
всё зависит от конкретной ситуации...

ну вот. Надеюсь, что раскрыл тему...

нет времени это читать - я не думаю, что там что-то полезное для меня

[Serge_Bliznykov]

нет времени это читать - я не думаю, что там что-то полезное для меня

да. согласен. теперь я думаю, что Вам это не поможет.
ну и ладно. главное, что TC это понятно...