用汇编语言编程实现:统计成绩中及格、不及格和缺考人数的程序
用汇编语言编写程序:分别统计下列成绩中及格不及格和缺考的人数debug执行,查看运行结果。06是及格的数量,02是不及格的数量,01是缺考数量。dsegsegmentscoresdb87,94,76,52,71,83,-1,66,41cntequ$-scores;成绩的个数pdb0;>=60qdb0;=60的个数jmps4s2:incq;
用汇编语言编写程序:分别统计下列成绩中及格不及格和缺考的人数
debug 执行,查看运行结果。 06是及格的数量,02是不及格的数量,01是缺考数量。

dseg segment
scores db 87,94,76,52,71,83,-1,66,41
cnt equ $-scores ;成绩的个数
p db 0 ;>=60
q db 0 ;<60
r db 0 ;-1
dseg ends
cseg segment
assume cs:cseg, ds:dseg
start:
mov ax, dseg
mov ds, ax
lea si, scores
mov cx, cnt
s0:
mov al, [si]
cmp al, -1
je s3
cmp al, 60
jb s2
inc p ; >=60 的个数
jmp s4
s2:
inc q ; < 60 的个数
jmp s4
s3:
inc r ; -1的个数
s4:
inc si
loop s0
; print p, q, r ,输出 结果,由于题目没有要,所以略过
mov ah, 4ch
int 21h
cseg ends
end start
有100个学生成绩统计100 90 60 9060以下同学有几个用汇编编写的
假设学生成绩存在1000h开始的数据段中,段地址为2000h
code segment assume cs:code start: mov bx,00h mov dx,00h mov di,00h
mov ax,2000h
mov cx,100
mov ds,ax
mov si,1000h mov ax,01h next6:mov [si],ax inc ax inc si loop next6 mov cx,100 mov si,1000h
next4:cmp byte ptr[si],90
jg next
cmp byte ptr[si],60
jg next2
inc di
inc si
loop next4
jmp next5
next:inc bx
inc si
loop next4
next5:int 3h
next2:inc dx
inc si
loop next4
jmp next5
code ends
end start
用VB编写一学生成绩统计程序
Private Sub Form_Click()
Dim Score As Single, Sum As Single, N As Integer, Average As Single
Sum = 0
N = 0
Score = InputBox("请输入个同学的成绩", "成绩输入")
Do While Score <> -1
Sum = Sum + Score
N = N + 1
Score = InputBox("请输入第" & N + 1 & "个同学的成绩", "成绩输入")
Loop
Average = Sum / N
Print "平均成绩为:"; Average
End Sub
Windows 10 是一款微软推出的经典操作系统,拥有硬件兼容性与多任务处理能力。它更偏向把系统状态查看和常用调节动作放在一起,适合需要持续观察和微调设备状态的场景。
极度公式是一款跨平台专业LaTeX公式识别编辑软件,支持OCR公式识别和多平台编辑。和使用说明,避免使用,享受完整功能与稳定支持。做扫描整理、文字提取和表格转换时,它能把识别后的处理步骤接得更顺,资料录入这类场景会省下不少时间。
















