Задача №1 A DW 2 B DW -6 ANS0 DB "0","$" A0 DW ANS0 ANS1 DB "Net reshenii","$" A1 DW ANS1 ANS2 DB "LUBOI X","$" A2 DW ANS2 CMP B,-7 JNE BF CMP A,0 JE BTAT JNE BTAF BF: CMP A,0 JE BFAT MOV BX,B ADD BX,7 MOV AX,A XOR DX,DX IDIV BX OUTINT AX JMP FIN BTAT: MOV DX,A2 JMP FINA BTAF: MOV DX,A1 JMP FINA BFAT: MOV DX,A0 FINA:outstr FIN: Задача №2 MOV CX,0 MOV BH,0 MOV BL,N MOV DX,0 MOV BP,BX CMP M,BX JB FIN1 L: MOV AX,BP MUL BX MOV BP,AX inc CX CMP BP,M JNG L MOV AX,CX JMP FIN FIN1: MOV AX,0 FIN: outint AX Задача №3 N EQU 10 Y DW N DUP (?) Z DW N DUP (?) MOV BP,0 MOV DI,2*N-2 MOV CX,N MOV SI,0 L: ININT Y[SI] ADD SI,2 LOOP L MOV CX,N MOV SI,2*N-2 LL: CMP Y[SI],0 JL LS MOV AX,Y[SI] MOV Z[BP],AX ADD BP,2 JMP FL LS: MOV AX,Y[SI] MOV Z[DI],AX SUB DI,2 FL: SUB SI,2 LOOP LL MOV CX,N MOV SI,0 L1: MOV AX,Z[SI] MOV Y[SI],AX ADD SI,2 LOOP L1 MOV CX,N MOV SI,0 L2: OUTINT Y[SI] ADD SI,2 LOOP L2 Задача №4 Data Segment TIME STRUC H DB ? Min DB ? Sec DB ? TIME ENDS T1 Time <> T2 Time <> Data Ends ;-----begin of code------------------------ ;-----begin of input------------------------ Inint AX Mov T1.H,AL Inint AX Mov T1.Min,AL Inint AX Mov T1.Sec,AL Inint AX Mov T2.H,AL Inint AX Mov T2.Min,AL Inint AX Mov T2.Sec,AL ;-----end of input------------------------- Mov BL,T1.H Cmp T2.H,BL JG TwoH JL OneH Mov Bh,T1.Min CMP T2.Min,Bh JG TwoMin JL OneMin Mov Ch,T1.Sec CMP T2.Sec,Ch JG TwoSec JL OneSec JMP Output ;-----T1:=T2-------------------------------- OneH: Mov Bl,T2.H Mov T1.H,BL OneMin: Mov Bl,T2.Min Mov T1.Min,Bl OneSec: Mov Bl,T2.Sec Mov T1.Sec,Bl JMP OUTPUT ;----T2:=T1---------------------------------- TwoH: Mov T2.H,BL TwoMin: Mov T2.Min,BH TwoSec: Mov T2.Sec,Ch JMP OUTPUT ;----begin of output------------------------- OUTPUT: XOR AX,AX newline Mov AL,T1.H Outint AX newline Mov AL,T1.Min Outint AX newline Mov AL,T1.Sec Outint AX newline Mov AL,T2.H Outint AX newline Mov AL,T2.Min Outint AX newline Mov AL,T2.Sec Outint AX ;-----end of code-------------------------- ;-----чтоб не исчезал экран=) Inint BX finish C Ends End start