写程序段。查找CATT表中的字符”@”，找到后将SIGN单元置1，否则SIGN单元置0。