11.4 Написать на Asm программу для сохранения текстового экрана в буфере и последующей записи буфера в файл

Data segment

Buffer db 25 dup ( 80 dup (‘*’),13,10 )

Path db ‘c:\td\buffer.txt’,0

Handle dw ?

Data ends

Code segment

Assume cs:code, ds:data

Start proc far

Int 20h

Push ds

Sub ax,ax

Push ax

mov ax,data

mov ds,ax

push ds

pop es

lea di,buffer

cld

Mov bh , 0 ; указатель на страницу

Mov dh,0 ; указатель на строку

Cikl1: Mov dl,0 ; указатель на столбец

Mov cx,80

Cikl2: Mov ah,2h ; уст . курсора

Int 10h

Mov ah,8h ; чтение символа

Int 10h

Stosb ; es:di <- al

Inc dl

Loop Cikl2

Inc dh

Add di,2 ; проскочить 13 10

Cmp dh,25

jl Cikl1

Lea dx,path ; открыть файл

Mov al,1 ; вид доступа “запись”

Mov ah,3dh

Int 21h

Jc open_er

Mov handle , ax ; запись файлового индекса

Mov bx,ax

Sub cx,cx ; нулевое смещение

Sub dx,dx ; нулевое смещение

Mov al,2 ; смещ . от кон. ф.

Mov ah,42h ; уст. файловый указатель

Int 21h

Jc pointer_er

Mov ah,40h ; запись в файл 2050 байт из буфера

Mov bx,handle

Mov cx,2050

Lea dx,buffer

Int 21h

Jc outp_er

Cmp ax,2050

Jne full_disk

Mov bx,handle ; закрыть файл

Mov ah ,3eh

Int 21h

Full_disk:retf

Outp_er: retf

Pointer_er: retf

Open_er: retf

Start endp

Code ends

End start

11.5

		A1			A2	A3		A4
		1			2	A		B
		8			4	B		A
		1			2	C		D
		1			2	K		M
		2			7	N		P
		3			4	A		B
		3			4	C		D

A3	A4
A	B
C	D

a]π_A3,A4{σ_A3=B{R}}∩S

A1	A2	A3	A4
8	4	B	A

σ_A3=B{R}=

A3	A4
B	A

π_A3,A4{σ_A3=B{R}}=

A3	A4

π_A3,A4{σ_A3=B{R}}∩S=

SQL:

Б] R÷S

1. Q=π_A1,A2{R}=

A1	A2
1	2
8	4
2	7
3	4

A1	A2
8	4
2	7

2. P1=QxS= 4.P3= π_A1,A2{P2}=

		A1			A2	A3		A4
		1			2	A		B
		8			4	A		B
		2			7	A		B
		3			4	A		B
		1			2	C		D
		8			4	C		D
		2			7	C		D
		3			4	C		D

3. A1	A2
   1	2
   3	4

   P2=P1-Q= 5. R÷S=Q-P3=

A1	A2	A3	A4
8	4	A	B
2	7	A	B
8	4	C	D
2	7	C	D

SQL:

В]π_A1,A2{σ_A3=A{R}}xS

A1	A2	A3	A4
1	2	A	B
3	4	A	B

σ_A3=A{R}=

A1	A2
1	2
3	4

π_A1,A2{σ_A3=A{R}}=

A1	A2	A3	A4
1	2	A	B
3	4	A	B
1	2	C	D
3	4	C	D

π_A1,A2{σ_A3=A{R}}x S=

SQL: