нужен код в Делфи (консоль не использовать)

[EUgen\96]

помогите решить задачу на запись (в файл), плиз......ели можно, то не ипользуйте стрингрид.....
вот условие:

Известны данные о 30-ти учениках: фамилия, класс и оценка по информатике. Определить фамилию учеников 9-х классов, имеющих оценку «5».

[BDA]

Что не получается? Какие есть наработки?

[Lokos]

думаю как то так

var masUch:array [0..29,0..2]of string;
i:byte;
f:textFile;
begin
...заполнение массива...
ищем ваших учеников
   assignfile(f,'C:\1.txt');
   reset(f);
for i=0 to 29 do
   begin
      if (masUch[i,2]='5' and masUch[i,1]='9-класс') then
      writeln(f,'Фамилия='+masUch[i,0]);
   end;
closefile(f);

с записью файла не совсем уверен давно не пользовался.
все это с учетом что
masUch[i,0]-хранятся фамилии
masUch[i,1]-хранятся номера классов
masUch[i,2]-хранятся оценки

а вообще опишите задание получше)

[Sciv]

все это с учетом что

Может лучше вспомните про тип reсord?

Насколько я понял из условий, конкретный тип файла не указан...

[EUgen\96]

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

думаю как то так

var masUch:array [0..29,0..2]of string;
i:byte;
f:textFile;
begin
...заполнение массива...
ищем ваших учеников
   assignfile(f,'C:\1.txt');
   reset(f);
for i=0 to 29 do
   begin
      if (masUch[i,2]='5' and masUch[i,1]='9-класс') then
      writeln(f,'Фамилия='+masUch[i,0]);
   end;
closefile(f);

с записью файла не совсем уверен давно не пользовался.
все это с учетом что
masUch[i,0]-хранятся фамилии
masUch[i,1]-хранятся номера классов
masUch[i,2]-хранятся оценки

а вообще опишите задание получше)

а можно код Делфи....а то я как-то записи не понимаю....плиззз...

[Lokos]

это и есть кусок кода delphi
или вам написать как в файл записать данные?

[Lokos]

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

Может лучше вспомните про тип reсord?

Насколько я понял из условий, конкретный тип файла не указан...

можно и так, просто у человека какая то привязанность к stringgrid'у, думал с массивом понятней будет)

[Sciv]

у человека какая то привязанность к stringgrid'у

ели можно, то не ипользуйте стрингрид.....

Ну я бы сказал, что как раз наоборот

[EUgen\96]

помогите доработать программу в Делфи....я впринципе её сделал, но мне нужно через записи ее сделать, а как сделать - я не знаю...помогите плизззз
вот условие:

Известны данные о 30-ти учениках: фамилия, класс и оценка по информатике. Определить фамилию учеников 9-х классов, имеющих оценку «5».

вот прога, но нужно, чтобы она работала через записи...