Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ ":" expected but "identifier SR" found

Автор: compiler 27.06.2007 22:13

пишу

procedure SrArP( const ar:array of real; out sr:real);
Возникает ошибка... откуда
компилятор FPC, но на TP ошибка таже...

вся, вроде простая, процедура //могут быть еще ошибки
 procedure SrArP( const ar:array of real; out sr:real); 
var
i, sum:real;
begin
for i:=Low(ar) to High(ar) do if Positive(ar[i]) then sum:=sum+ar[i];
s:=sum/(High(ar) - Low(ar));
end;
)

заранее благодарен.

Автор: volvo 27.06.2007 22:50

Во-первых, если FPC, то в каком режиме компилируешь? В ObjFPC/Delphi выдает только ту ошибку, что i должно быть целым числом, чтоб его использовать в качестве переменной цикла...

В режиме совместимости с TP - все правильно, нет в Турбо Паскале слова Out, компилятор считает это идентификатором, и естественно ждет определения его типа, после двоеточия, а двоеточия-то и нет...

Автор: compiler 27.06.2007 23:01

Цитата(volvo @ 27.06.2007 18:50) *
Во-первых, если FPC, то в каком режиме компилируешь?
в диалекте FPC, в нем разве нет Out?
Цитата(volvo @ 27.06.2007 18:50) *
В ObjFPC/Delphi выдает только ту ошибку, что i должно быть целым числом, чтоб его использовать в качестве переменной цикла...
ObjFPC действительно работает... конечно если сделать целым числом smile.gif
Цитата(volvo @ 27.06.2007 18:50) *
В режиме совместимости с TP - все правильно, нет в Турбо Паскале слова Out, компилятор считает это идентификатором, и естественно ждет определения его типа, после двоеточия, а двоеточия-то и нет...
а я думал... smile.gif