B.判断longint范围内的数是否为素数(包含求50000以内的素数表):procedure getprime;var i,j:long B.判断longint范围内的数是否为素数(包含求50000以内的素数表):procedure getprime;vari,j:longint;p:array[1..50000] of boolean; 参考答案 查看答案