комбинированные типы. операторы присоединения. Опции

[ducky]

помогите пожалуйста из неработающей программы, работающую сделать..

program errors;
 type поле = (а,b);
запись = record a:integer; b:char end;
 var х,у:запись; c:char;
 function f (var r:запись):запись;
 var р:поле;
begin for p := a to b do f.p := succ(z.p) end;
 begin read©;
with x do begin a := ord©; b := c end;
y := x; if x = у then y := f(x);
with у do writeln(a,x) 
end.

[ducky]

Паскаль у меня. компилятор же там есть..

[Lapp]

Паскаль у меня. компилятор же там есть..

н-даа..
Какой у тебя Паскаль?

Turbo Pscal?
Pascal-ABC?
FreePascal (FPC)?
...

Ответь, пожалуйста..

Смысл вот, в чем. Я знаю точно, что ни Turbo, ни FPC не признают русских идентификаторов. Но про ABC я точно не знаю. Потому и спросил.
И в любом случае я ОЧЕНЬ не рекомендую тебе использовать русские буквы в названиях переменных (даже если твой какой-нить неизветсный мне зверь типа Паскаль-ЭЮЯ это и позволяет).
Короче, переделай все на английские буквы, тогда будем говорить по делу.