задачи на "файлы"

[Photolife]

Решите задачу,пожалуйста, кому не трудно!

Из внешнего файла, содержащего исходные данные, переписать в другой файл и распечатать:список абитуриентов, имеющих средний балл в аттестате 4,5.

заранее спасибо!

[BDA]

Укажите язык программирования, и как выглядят данные во входном файле.

[Photolife]

паскаль, оба файла .dat

[BDA]

Окей, с языком разобрались.
Не расширение файла, а как выглядят "внутренности" файла. Например:

Иванов 2 2 2
Петров 3 4 5
Сидоров 5 4 3

или

Иванов 2.6
Петров 4.3
Сидоров 3.7

[Photolife]

а всё понял, последний вариант

[BDA]

Uses CRT;
var
f1,f2:textfile;
s:string;
f:real;
a:integer;
BEGIN
assign(f1,'in.dat');
assign(f2,'out.dat');
reset(f1);
rewrite(f2);
while not eof(f1) do
begin
	readln(f1,s);
	val(copy(s,pos(' ',s)+1,length(s)-pos(' ',s)),f,a);
	if f=4.5 then
		writeln(f2,copy(s,1,pos(' ',s)-1));
end;
close(f1);
close(f2);
END.

[Photolife]

ошибка, не удалось найти указанный файл

[BDA]

Создайте файл со списком абитуриентов с именем in.dat и положите его около exe файла получившейся программы.

[Photolife]

не работает она!

[BDA]

А какие ошибки выдает?