问答题 求出1900～2100的闰年，要求把求出的闰年存入数组Y，并统计闰年的数目。以7位宽度输出闰年年号，每行10个。

问答题 下列模块中的子程序DECTOR的功能是用除R取余法将整数X转换成R（2<=R<=9）进制的数字，并把结果存放在数组B中，B（0）存放R进制数的位数，其正负号与X相同，最低位放在B（1）中；模块中的函数ISPRIME的功能是判断整数X是否为一个素数，是返回.TRUE.，否则返回.FALSE.。

问答题 阅读程序，并写出程序的运行结果。