早教吧 育儿知识 作业答案 考试题库 百科 知识分享

任意输入20个正整数,找出其中的素数,并将这些素数按由小到大排序.要求:判断一个数是否为素数用函数实现;排序用函数实现.

题目详情
任意输入20个正整数,找出其中的素数,并将这些素数按由小到大排序.要求:判断一个数是否为素数用函数实现;排序用函数实现.
▼优质解答
答案和解析
Sub a()Dim a(0 To 19) As LongDim b() As LongDim i As LongDim k As Longk = 0For i = 0 To UBound(a)a(i) = InputBox("","")If 素数(a(i)) ThenReDim Preserve b(k) As Longb(k) = a(i)k = k + 1End IfNext ib = ...
看了任意输入20个正整数,找出其中...的网友还看了以下: