你的程序我基本看懂了,单个子程序都没有大的问题,但是子程序间的参数传递有点乱
改好的程序如下,不一定正确,你可以试试
大家也可以彼此联系,互相交流交流
DSEG SEGMENT
sushu dw 1000 dup();存放素数
msgsushu db "all of sushu are:",'$';显示素数的提示信息
DSEG ENDS
CSEG SEGMENT
assume cs:CODE, ds:DATA
MAIN PROC FAR
call jisuan;将1000以内素数的个数存入COUNT单元中
lea dx,offset msgsushu;显示素数的提示信息
mov ah,09h
int 21h
call dispsushu;显示素数
lp1:mov ah,0bh
int 21h
jz lp1
mov ax, 4c00h ;程序结束,返回到 *** 作系统系统
int 21h
MAIN ENDP
jisuan proc near
mov ax, dseg
mov ds, ax
mov cx,2
lea di,sushu
mov bx,2;求从2到1000的素数、素数个数,BL从2到1000变化
next11:
cmp bx,1000
jae tj
mov cx,2;如果BL不能被DL从2到BL-1整除的话,则BL为素数
next12:
cmp cx,bx
jae next13
mov ax,bx
mov dx,00h
div cx
cmp dx,0
jz next14;整除则不是素数
inc cx
jmp next12
next13:
mov [di],bx;是素数,则存入相应单元中
inc di
inc di
next14:
inc bx
jmp next11
tj:ret
jisuan endp
dispsushu proc near
lea si,sushu
mov cx,00h
next21: mov ax,cx
mov bl,10
div bl
cmp ah,0
jnz next22
mov dl,0dh;每行10个素数,行末加回车换行
mov ah,2
int 21h
mov dl,0ah
mov ah,2
int 21h
next22:
mov bx,[si];取出一个素数
call disp10;以十进制形式输出
mov dl,20h;每个素数之间加一个空格,便于区分
mov ah,2
int 21h
inc si
inc si
inc cx
cmp cx,1000
jb next21
ret
dispsushu endp
disp10 proc near;该子程序的作用是将BX中的数以十进制形式输出
push cx
mov cx,100d
call dec_div
mov cx,10d
call dec_div
mov cx,1d
call dec_div
pop cx
ret
dec_div proc near
mov ax,bx
mov dx,0
div cx
mov bx,dx
mov dl,al
add dl,30h
mov ah,2
int 21h
ret
dec_div endp
disp10 endp
CSEG ENDS
END MAIN
其他错误目前还看不出来,以后看出来了再来更改答案
希望对你有所帮助
var arr = [15,12,11, 28, 11, 11, 28, 28, 28, 29, 29, 29, 11];
var tempArr = [];
var indexArr= [];
for (var i = 0; i < arrlength; i++) {
if (tempArrindexOf(arr[i]) == -1) {
tempArrpush(arr[i]);
indexArrpush(i)
} else if (tempArrindexOf(arr[i])>=0){
for(var j = 0;j<tempArrlength;j++){
if (tempArr[j] == arr[i]) {
tempArrsplice(j, 1, tempArr[j]);
indexArrsplice(j, 1, i);
}
}
}
}
consolelog('去重',tempArr,indexArr)
结果:
tempArr:[15, 12, 11, 28, 29]
indexArr:[0, 1, 12, 8, 11]
var arr = [15,12,11, 28, 11, 11, 28, 28, 28, 29, 29, 29, 11];
var data = [];
for(var i = 0;i<arrlength;i++){
var newTag = false;
if(datalength > 0){
for(var z = 0;z < datalength;z++){
if(arr[i] == data[z]){
newTag = true;
}
if(z == datalength - 1 && !newTag){
datapush(arr[i]);
}
}
}else{
datapush(arr[i])
}
}
consolelog('去重', data)
var tapArr = [];
for(var i = 0;i<datalength;i++){
var tag = 0;
for(var j = 0;j<arrlength;j++){
if(data[i] == arr[j]){
tag = j;
}
if(j == arrlength - 1){
tapArrpush(tag)
}
}
}
consolelog('去重:::',tapArr)
以上就是关于能打开小程序的初版本微信全部的内容,包括:能打开小程序的初版本微信、求汇编小程序,二十行以上、求高手编写一个汇编语言的小程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)