case

[parniyan2]

سوال من بیشتر مربوط به زبان دلفی یعنی همون پاسکاله
چرا این دستورات اجرا نمی شن؟

var rang:string;
begin
readln(rang);
case rang of
'ghermez' : write ( ' red ' ) ;
'abi' : write ( ' blue ' ) ;
'sabz' : write ( ' green ' ) ;
'sefid' : write ( ' white ' ) ;
'zard' : write ( ' yellow ' ) ;
else
write ( ' other ' ) ;
end.

[Felony]

دوست عزیز در عبارت
case rang of
Rang عبارت Selector شما هست و سلکتور باید از نوع اردینال باشه درسته که بعضی نوع اطلاعات اردینال هستند مانند : Word,String,Longint ولی باید رنج خروجی اردینال آنها بین 32767 تا -32768 باشد پس بدین ترتیب شما نمیتونید رشته رو اینجا و به این صورت استفاده کنید ...