帮忙解决几道vb试题 谢谢了

来源：百度知道 编辑：UC知道 时间：2024/09/22 13:25:45
1.设某职工实发工资x元，求以各种面额钞票总张数最少的付款方案？
2.输入一个整数，判断是否为素数。
3.设有一个10*10的方阵，其中元素是由计算机随即生成小于100的整数。
求：1，对角线上的元素之和。2，方阵中最大的元素。

1:这还用算？肯定是越大越好了，100元的。
2：
dim n%
n=inputbox"Please input"
for i=1 to n
for j=2 to i-1
if i mod j=0 then exit for :msgbox "No"
next j
msgbox "Yes"
next i
3:
dim max%
static sum%
sum=0
for i=1 to 10
for j=1 to 10
randomize
a(i,j)=rnd*101
if i=j then sum=sum+a(i,i)
next j
next i
max=a(1,1)
for i=1 to 10
for j=1 to 10
if a(i,j)>max then t=a(i,j):a(i,j)=max:max=t
next j
next i

很简单 既然给0分 自己做吧

0分……