Паскаль, файл с данными - Помощь студентам - Страница 2

puporev · 13.12.2008, 21:28

Где Вы взяли файл H:/RGR3.dat'); и что в нем записано.

puporev · 13.12.2008, 21:38

Это должно быть в конце:
while not EOF(f) do
begin
read(f,a);
If (max-a.stoim_t)<=100 then writeln(a.nazv_e);
end;
А вот это должно быть раньше, когда Вы заполняли данные о стоимости игрушек. Этой части кода нет.

Типа max:=0;
readln( a.stoim_t);
If a.stoim_t>max then a.stoim_t:=max;

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
непонятки с данными	KiSH333	БД в Delphi	5	01.09.2008 08:36
Файл с данными	werser	БД в Delphi	1	24.05.2008 23:40
Как сохранять bmp картинки в файл с данными	andrey4623	Мультимедиа в Delphi	2	25.06.2007 08:36
Как вытащить данные из Excel в бд dephi, а потом (после работы с данными) сформировать новый файл excel.	Геля	БД в Delphi	1	10.04.2007 15:11

13.12.2008, 21:28	#11
puporev Старожил Регистрация: 13.10.2007 Сообщений: 2,740	Где Вы взяли файл H:/RGR3.dat'); и что в нем записано.

13.12.2008, 21:38	#12
puporev Старожил Регистрация: 13.10.2007 Сообщений: 2,740	Это должно быть в конце: while not EOF(f) do begin read(f,a); If (max-a.stoim_t)<=100 then writeln(a.nazv_e); end; А вот это должно быть раньше, когда Вы заполняли данные о стоимости игрушек. Этой части кода нет. Типа max:=0; readln( a.stoim_t); If a.stoim_t>max then a.stoim_t:=max;