Почему программа решена не правильно?

[gromdel]

Здравствуйте, записался в онлайн олимпиаду. Сегодня пробное решение было. Решил задачу, отправил. Подскажите, почему задача не правильна решена.
Вот задание:

Вот решение:

var
f,f2:text;
j,a:integer;
m:array[1..40] of longint;
begin
 assign(f,'stdin');
 assign(f2,'stdout');
reset(f);
rewrite(f2);
j:=0;
while not eof(f) do
begin
read(f,a);
j:=j+a;
end;
writeln(f2,j);
close (f2);
close (f);
end.

Подскажите пожалуйста.

[Pavia]

Стандартный ввод и вывод. Это тот который работает с консолью, а не с файлами.
stdin и stdout - это для Си.
В паскале надо просто читать с консоли и выводить на неё.
Read(a);
WriteLn(Sum);

[gromdel]

Извините, хочу уточнить. В правилах было сказано, что решения программа проверяет автоматически. Вопрос отсюда вытекает. Она сможет работать с read и writeln? Я еще не сталкивался с такими ситуациями

[Аватар]

Я бы попробовал и узнал может или нет. Откуда кому то знать как там реализовано?

[gromdel]

Пробовать один раз можно. Думал, все олимпиады одинаково устроены, и кто-то из избороздил десятками уже

[Аватар]

Обычно пишут требования, почитай внимательно

[Pavia]

В правилах было сказано, что решения программа проверяет автоматически. Вопрос отсюда вытекает. Она сможет работать с read и writeln? Я еще не сталкивался с такими ситуациями

Да, сможет. Программа автоматического тестирования перенаправляет ввод и вывод тестируемой программы в себя.

[temaps]

ДЛя паскаля стандартный вывод и ввод input и output

program blahblah;

var s :string;

begin
  reset(input);
  rewrite(output); 
  while not eof(input) do begin
    readln(input,s);
    writeln(output,s);
  end;
  close(output);
  close(input);
end.

[temaps]

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

Стандартный ввод и вывод. Это тот который работает с консолью, а не с файлами.
stdin и stdout - это для Си.
В паскале надо просто читать с консоли и выводить на неё.
Read(a);
WriteLn(Sum);

А как тогда понять что ввод закончен? Там в условии просто "поток данных"