RosettaCodeData/Task/Four-is-magic/Zkl/four-is-magic-1.zkl
2023-07-01 13:44:08 -04:00

14 lines
340 B
Text

fcn fourIsMagic(int){
if(int==0) return("Zero is four, four is magic.");
string:="";
while(1){ c:=nth(int,False);
string+="%s is ".fmt(c);
if(int = ( if(int==4) 0 else c.len() )){
string+="%s, ".fmt(nth(int,False));
}else{
string+="magic.";
break;
}
}
string[0].toUpper() + string[1,*]
}