4.现假设方程系数是32位整数 ,判断方程ax2+bx+c=0是否有实根，若有实根则将字节变量tag置1,否则将字节变量 tag置0。

下面是一个使用汇编语言判断一元二次方程是否有实根的示例程序：

section .data
    a dd 2          ;方程系数a，初始化为2
    b dd 5          ;方程系数b，初始化为5
    c dd 2          ;方程系数c，初始化为2
    tag db 0        ;标记变量tag，初始化为0

section .text
    global _start

_start:
    ;计算判别式D = b^2 - 4ac
    mov eax, [b]     ;将系数b加载到寄存器eax中
    imul eax, eax    ;eax = b^2
    mov ebx, [a]     ;将系数a加载到寄存器ebx中
    imul ebx, [c]    ;ebx = ac
    shl ebx, 2       ;ebx = 4ac
    sub eax, ebx     ;eax = b^2 - 4ac = D

    ;判断D的正负性
    cmp eax, 0       ;比较D和0的大小
    jge has_real_root ;如果D大于等于0，跳转到has_real_root标签
    mov byte [tag], 0 ;否则将tag置0
    ;如果没有实根，直接退出程序
    mov eax, 1
    xor ebx, ebx
    int 0x80

has_real_root:
    mov byte [tag], 1 ;将tag置1
    ;如果有实根，可以在这里计算实根的值，并将其输出
    ;最后使用int 0x80指令退出程序
    mov eax, 1
    xor ebx, ebx
    int 0x80

在上面的示例程序中，我们首先计算出判别式D，然后判断D的正负性，如果D大于等于0，说明方程有实根，将标记变量tag置1，否则将其置0。请注意，由于系数是32位整数，需要使用32位寄存器（如eax、ebx等）来进行计算。