Toán tử sizeof

Tên biến dữ liệu gồm có chữ, con số hay dấu gạch dưới, phân biệt chữ hoa và chữ thường
ký tự đầu luôn là chữ hay dấu gạch dưới
không được trùng với từ khóa.

12p sakuraphuong 04-06-2013 72 3   Download

Lý thuyết đồ thị procedure Enter; {Nhập dữ liệu từ thiết bị nhập chuẩn (Input)} var i, u, v, m: Integer; begin FillChar(a, SizeOf(a), False); {Khởi tạo đồ thị chưa có cạnh nào} ReadLn(n, m, S, F); {Đọc dòng 1 ra 4 số n, m, S và F} for i := 1 to m do {Đọc m dòng tiếp ra danh sách cạnh} begin ReadLn(u, v); a[u, v] := True; a[v, u] := True; end; end; procedure DFS(u: Integer); var v: {Vào dòng

25p xingau3 07-08-2011 82 20   Download

Chép phần run còn lại trong Ft1 về Fd B17: IF (K1 L) //Đã chép hết phần run còn lại trong Ft1 về Fd Lặp lại B6 B18: fwrite(&a1, sizeof(T), 1, Fd) B19: K1++ B20: IF (feof(Ft1)) //Đã chép hết các phần tử trong Ft1 Thực hiện B23 B21: fread(&a1, sizeof(T), 1, Ft1) B22: Lặp lại B17 //Chép các phần tử còn lại trong Ft2 về Fd B23: fwrite(&a2, sizeof(T), 1, Fd) B24: IF (feof(Ft2))

5p phuoctam47 02-08-2011 62 6   Download

Chép phần run còn lại trong Ft1 về Fd B17: IF (K1 L) //Đã chép hết phần run còn lại trong Ft1 về Fd Lặp lại B6 B18: fwrite(&a1, sizeof(T), 1, Fd) B19: K1++ B20: IF (feof(Ft1)) //Đã chép hết các phần tử trong Ft1 Thực hiện B23 B21: fread(&a1, sizeof(T), 1, Ft1) B22: Lặp lại B17 //Chép các phần tử còn lại trong Ft2 về Fd B23:

5p phuoctam38 12-07-2011 45 3   Download