RosettaCodeData/Task/Comma-quibbling/XBS/comma-quibbling.xbs
2023-07-01 13:44:08 -04:00

14 lines
281 B
Text

func task(a:array){
set x:string="";
foreach(k,v as a){
set out:string="";
if ((k==(?a-2))&((?a)>1)){out=" and "}elif(k!=(?a-1)){out=", "}
x+=v+out;del out;
}
send "{"+x+"}";
}
log(task([]));
log(task(["ABC"]));
log(task(["ABC","DEF"]));
log(task(["ABC","DEF","GHI"]));