$_**=22-$_,print"@a[2*y///c..26]$_
"for 2..22