start:
	mov r0, #62 @ delimoe
	mov r1, #31 @ delitel
	mov r2, #0b0000 @ chastnoe
	mov r3, #0 @ cho
	mov r4, #0b0000 @ schetchik sdvigov
	mov r3, r0

	cmp r1, #0b00001111
	ble sh4
	cmp r1, #0b00011111
	ble sh3
	cmp r1, #0b00111111
	ble sh2
	cmp r1, #0b01111111
	ble sh1
	cmp r1, #0b11111111
	ble sh0

cycle:
	cmp r4, r5 @ proverka kolichestva iteracii
	beq ending
	mov r1, r1, lsr#1 @ sdvig delimogo vlevo na 1
	add r4, r4, #0b1
	sub r3, r3, r1 @ vychitanie chast ost i delitelya
	cmp r3, #0 @sravnenie s nulem
	bmi neg @ delimoe < 0
	bpl poz @ delimoe > 0
	b cycle
neg:
	add r3, r3, r1 @ slozhenie delimogo s delitelem
	mov r2, r2, lsl#1 @ sdvig chastnogo
	b cycle @ perekhod v cycle

poz:
	add r2, r2, #0b0001 @ uvelichenie chastnogo
	mov r2, r2, lsl#1 @ sdvig chastnogo
	b cycle

sh4: mov r5, #4
	mov r1, r1, lsl#4
	b cycle

sh3: mov r5, #3
	mov r1, r1, lsl#3
	b cycle

sh2: mov r5, #2
	mov r1, r1, lsl#2
	b cycle

sh1: mov r5, #1
	mov r1, r1, lsl#1
	b cycle

sh0: mov r5, #0
	b cycle

ending:
	mov r2, r2, lsr#1
	stop: b stop