i=13;DO1;1	i=i-i/i+fput(chaR(ichaR("%hpvs{$0sppiL"(i:))-4));EnD