begin integer c,i,t,k;a:i:=i-i//80*80+1;c:=rank(inchar);if c=84then t:=i;if c=75then k:=1;outchar(if t=i or k=1then'T'else' ');if i<t or k=0then goto a;end