Малетько В. (ПО-11) на последней паре вместо занятий "серфил по Инет".
Ему выставен пропуск занятия.  

int __in __bits(8)A1;
int __in __bits(8)A2;
int __in __bits(8)A3;
int __in __bits(16)a;
int __out __bits(16)res;

void main()
{
if (a==29603)res=38712;
if (a==23456)res=32547;
if (a==1937)res=826;
if (a==4862)res=5973;
if (a==11233)res=322;
}

unsigned __in __bits(8) IN_0;
unsigned __in __bits(8) IN_1;

unsigned __out __bits(8) OUT;

void main()
{
   unsigned __bits(1) x=(IN_0<<4)>>5;
   if (x==0) OUT=(-IN_1);
   else	OUT=~IN_1;
   if (IN_0==13) OUT=171;
if (IN_0==15) OUT=52;
}

Михаил Долинский:

Малетько В. (ПО-11) на последней паре вместо занятий "серфил по Инет".
Ему выставен пропуск занятия.  

Ну, во-первых: я не "серфил по Инет", а смотрел локальный сайт Gsu.by в целях нахождения чего-нибудь полезного для обучения. 

Во-вторых: на каком основании пропуск, если я всеже решал задачи на DL? 

	JMP    BEGIN
a        DW	 1
b        DW	 1
c	 DB	 1
d	 DB	 1
res      DW	 1
BEGIN:
	MOV      AX,b
	CMP      AX,0
	JG       MET1
	MOV      AL,c
	CMP      AX,0
	JG         MET1
	JNG       MET2
MET1:
        MOV      AX,a
	CWD
	IDIV     b
	CBW
	CWD
	IDIV     c
	CBW
	CWD
	MOV      CX,AX
	MOV      AL,d
	CBW
	CWD
	IMUL     c
	MOV     BX,AX
	MOV     AL,d
	CBW
	CWD
	IDIV	b
	SUB     BX,AX
	MOV     AX,BX
	CBW
	CWD
	IMUL     a
	ADD	AX,CX
	MOV     res,AX
	JMP	ENDS
MET2:
        MOV     AX,a
	CBW
	CWD
	IMUL    b
	ADD	AL,c
	CBW
	CWD
	IMUL    d
	MOV     BX,AX
	MOV     AX,a
	CBW
	CWD
	IMUL    d
	ADD     AX,b
	CBW
	CWD
	IMUL     c
	SUB     BX,AX
	MOV     AX,BX
	CBW
	CWD
	IDIV    b
	MOV    res,AX
	JMP    ENDS

ENDS:    JMP      ENDS     ;$E

JMP begin
a dw 8
b dw 2
c db -1
d db 6
res dw 0
begin:



  mov ax,b
  cmp ax,0
  JG met1
  mov al,c
  cmp ax,0
  JG met1
  JMP met2


met1:
  mov ax,a
  cwd
  idiv b
  cbw
  cwd
  idiv c
  cbw
  cwd
  mov cx,ax    ;(a/b)/c
  mov al,d
  cbw
  cwd
  imul c      ;d*c->ax
  mov bx,ax   ; d*c->bx
  mov al,d
  cbw
  cwd    ;al=d
  idiv b      ;d/b
  sub bx,ax   ;d*c-d/b
  mov ax,bx   ;->ax
  cbw
  cwd
  imul a      ;ax*a
  add ax,cx	; B AX!!!
  mov res,ax
  JMP ENDS

Met2:
  mov ax,a
  cbw
  cwd
  imul b
  add al,c
    cbw
  cwd
  imul d
  mov bx,ax
  mov ax,a
  cbw
  cwd
  imul d
  add ax,b
  cbw
  cwd
  imul c
  sub bx,ax
  mov ax,bx
  cbw
  cwd
  idiv b  ; 2-e
  mov res,ax
  JMP ends

ENDS: JMP ENDS ;$E

	jmp     begin
a       dw	8
b       dw	2
c	db	-1
d	db	6
res	dw      0

begin:
	mov	al,c
	cmp	al,0
	jle 	m1
	jmp	m3
m1:
	mov 	ax,b
	cmp 	ax,0
	jl	m2
	jmp	m3
m2:
	mov	ax,a
	imul	b
	add	al,c
	imul	d
	mov	dx,ax
	mov	ax,a
	imul	d
	add	ax,b
	imul	c
	sub	dx,ax
	mov	ax,dx
	cwd
	idiv	b
	mov	res,ax
	jmp	ends
m3:
	mov	ax,0
   	mov	al,d
	cwd
	idiv	b
	mov	cx,ax

	mov	al,d
	imul	c
	sub	ax,cx
	imul	a
	mov	cx,ax

	mov	ax,a
	cwd
	idiv	b
	cwd
	idiv	c
	cbw
	add	ax,cx
	mov	res,ax
ends:   jmp     ends      ;$E

jmp	begin
  a	dw	5
  b	db	4
  c	db	2
  d	dw	4
  res	dw	0
begin:
   mov ax,a
   idiv c
   mov bx,ax
   mov al,b
   cbw
   imul	d
   add bx,ax
   mov al,c
   cbw
   imul a
   add bx,ax
   mov ax,a
   add ax,d
   mov cx,ax
   mov al,b
   cbw
   imul	cx
   mov cx,ax
   mov ax,bx
   mov bx,cx
   sub ax,bx
   mov res,ax
   mov dx,a
   cmp dx,5
   je m1
   jmp m2
m1:mov cx,-8
   mov res,cx
m2:	jmp	m2	;$e

1) По-моему мнению, никакие проблемы (c WInter, HLCCAD, DL, задачами, тестами, осью, вирусами ...) не могут решаться таким способом.  

2) Если в этом случае Вы нашли достаточно оснований подгонять под ответ, значит ничто не могло Вас остановить делать тоже самое и в других случаях, когда задача не сдается, а "очень хочется сдать".  

3) В случае обнаружения проблем об этом нужно писать в форуме - это всем (и Вам в первую очередь) хорошо известно.  

Вот если Вы так уверенны что ЕСТЬ У КАЖДОГО ИЗ НАС ТАКИЕ ПОДГОНКИ - ДОКАЖИТЕ.