سئوال اول - با توجه به تعریف روبرو کدام عملیات زیر صحیح می باشد؟

c: (red,green,blue);

1-write (red);

2-write (pred(ord(red)));

3-write (succ(pred(pred(red))));

4- write (succ (c));

 --------------------------------------------------------------------------------------------------------------------------------------------------------

سئوال دوم - خروجی دستور زیر چیست؟

type 
    D=(A,B,C,E,F);
    begin
      writeln(ord(C)+Succ(A)+pred(F));

۶-۱

۳-۲

۵-۳

۴ -خطا دارد

--------------------------------------------------------------------------------------------------------------------------------------------------------

سئوال سوم -  خروجی برنامه زیر چیست؟

type

color =(red,green,blue,yellow)
var
c:color;
begin
c:=red;
write (chr(succ(c)+'A'); end;

1- green A
2- 1A
3-'A'
4- خطا دارد

اگه میشه لطفا اینو برام توضیح بدین که کدوم گزینه میشه به چه دلیل؟