delphi if a in[1,2,3,4,5] then b='c' else b=''
展开全部
有多种写法啊:
一、如果a定义为整型: a: Integer
if (a>=1 ) and (a<=5) then
b := 'c'
else
b := '';
二、 如果a定义为字符型 a : Char
if a in ['1','2','3','4','5'] then
b := 'c'
else
b := '';
一、如果a定义为整型: a: Integer
if (a>=1 ) and (a<=5) then
b := 'c'
else
b := '';
二、 如果a定义为字符型 a : Char
if a in ['1','2','3','4','5'] then
b := 'c'
else
b := '';
追问
我这样写你看对吗
a : Char
begin
if a in ['1','2','3','4','5'] then
b := 'c'
else
b:=''
end
追答
正确,不过要写对地方!
var
a : Char;
b,c : string;
begin
f a in ['1','2','3','4','5'] then
b := 'c'
else
b:=''
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询