input""a
line input""b$
for k=1to a
for i=1to len(b$)for j=1to a
if(k=1)+(k=a)+(j=1)+(j=a)?mid$(b$,i,1);:goto 1
?" ";
1next
next
?next