请问这样的判断表达式样写？(50分)

L

lemondu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #1

const
bdfh: array[0..20] of String = ('#','$','(',')','*',',',
'.','/',':',';','[',']','{','}','<','>',
'-','=','+','''','@');
var
s:string;
.......
如果我想判断 s是否是 bdfh 中的任意一个字符，请问这个表达式怎样写，谢谢!

 

D

dasa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #2

for i:=0 to 20 do
if s[j]=a then

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #3

const
bdfh:String ='#$()*,./:;[]{}<>-= ''@';
var
s:string;
i:integer;
s:='avcd*&';
begin
i:=2;
if pos(s,bdfh)>0 then
showmessage('In It');

 

W

watter

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-24

• #4

为什么不用集合类型，直接用”In“判断就行了。