bai tap ve kieu du lieu xau

... 100 từ có tần số lớn Chương Cấu trúc Hãy cài đặt thuật toán duyệt nhị phân (NLR) không dùng đệ qui (dùng stack) Hãy cài đặt thuật toán duyệt nhị phân theo mức không dùng đệ qui (dùng queue) Cho ... hãy: a Viết thủ tục/hàm để tính tổng số nút có nhánh (con trái HAY phải) cách d ùng thuật toán duyệt gốc NLR b Thiết lập công thức đệ qui để thực y cầu câu [a] Cài đặt công thức thành thủ tục/hàm...

Ngày tải lên: 31/03/2014, 19:20

Ngày tải lên: 06/07/2014, 06:20

Ngày tải lên: 22/02/2014, 16:20

... trình tập 3: Program xaunguoc; Uses Crt; Var St: String[80]; i:Byte; Begin Write(‘Nhap xau St: ‘); Readln(St); For i:=length(St) downto write(St[i]); Write( Xau nguoc cua xau st la: ‘, St); Readln; ... thuộc vận dụng em thấy kì diệu tin học Chương trình tập 4: Program baitap3; Uses Crt; Var St: String[25]; i:Byte; Begin Write(‘Nhap xau St: ‘); Readln(St); Write(‘ket qua la: ‘); For i:=1 to length(St) ... nhiều cách tay giơ lên Chương trình mà em học sinh sửa sau: Program baitap5; Uses Crt; Var St: String[25]; i:Byte; Begin Write(‘Nhap xau St: ‘); Readln(St); Write(‘ketqua la:’); For i:= length(St)...

Ngày tải lên: 09/05/2014, 20:03

... chúng xâu A có mã ASCII lớn xâu B + Xâu B đoạn đầu xâu A Tin hoc = Tin hoc Ha Noi > Ha Nam Xau < Xau ki tu b Các thủ tục hàm chuẩn xử lí xâu Thủ tục ý nghĩa Ví dụ Delete(S,vt,n) Xoá n kí tự ... bước: Khai báo xâu Nhập xâu Thể pascal Var a,b: string; BEGIN Write( Nhap xau ho ten thu nhat :); Readln(a); Write(Nhap xau ho ten thu hai :); Readln(b); Xử lí xâu IF Length(a)>Length(b) Then write(a) ... theo thuật toán toán trên? bên Thuật toán B1 Khởi tạo xâu rỗng; B2 Lần lượt duyệt qua tất phần tử xâu vừa nhập, phần tử duyệt khác dấu cách bổ sung vào xâu rỗng Hãy nhớ! Xin chao cac ban! Xâu...

Ngày tải lên: 19/07/2014, 08:00

... chúng xâu A có mã ASCII lớn xâu B + Xâu B đoạn đầu xâu A Tin hoc = Tin hoc Ha Noi > Ha Nam Xau < Xau ki tu b Các thủ tục hàm chuẩn xử lí xâu Thủ tục ý nghĩa Ví dụ Delete(S,vt,n) Xoá n kí tự ... bước: Khai báo xâu Nhập xâu Thể pascal Var a,b: string; BEGIN Write( Nhap xau ho ten thu nhat :); Readln(a); Write(Nhap xau ho ten thu hai :); Readln(b); Xử lí xâu IF Length(a)>Length(b) Then write(a) ... theo thuật toán toán trên? bên Thuật toán B1 Khởi tạo xâu rỗng; B2 Lần lượt duyệt qua tất phần tử xâu vừa nhập, phần tử duyệt khác dấu cách bổ sung vào xâu rỗng Hãy nhớ! Xin chao cac ban! Xâu...

Ngày tải lên: 19/07/2014, 19:01

... Chiếu chương trình ví dụ: cách xâu Var st:string; Quan sát cấu trúc chug hàm Begin st:=copy( bai tap ,3,4); Write(st); readln; End - Hỏi: Kết chương trình in hình? - Thực chương trình để học ... ý cho học sinh: Một xâu có độ dài nhỏ lớn (>) xâu có độ dài lớn IV ĐÁNH GIÁ CUỐI BÀI Những nội dung học - Khai báo biến: VAR tên_biến : STRING[độ dài lớn xâu]; - Nhập xuất giá trị cho biến xâu: ... với cách tham chiếu đến phần tử mảng - Yêu cầu học sinh tìm ví dụ Kiểm tra kiến thức - Chiếu nội dung tập kiểm tra kiến thức: Var st:string[1]; c:char; Begin c:=st[1]; {1} c:=st; {2} End - Hỏi:...

Ngày tải lên: 28/07/2014, 17:20

... vidu1; User crt; Var Xau1 , Xau2 : string; Begin Clrscr; Write(‘nhap ho ten thu nhat ’); Readln (Xau1 ); Write(‘nhap ho ten thu hai ’); Readln (Xau2 ); If length (Xau1 ) > length (Xau2 ) then write (Xau1 ) ... Else write (Xau2 ); readln End Ví dụ Nhập xâu, viết hình xâu theo thứ tự ngược lại ký tự xâu Ví dụ Program VD3 ; Uses crt ; Var x : String ; k : Byte ; Begin Clrscr ; Write('Nhap xau : ') ; Readln(x) ... User crt; Var x : string; i, : byte; Begin Write (‘nhap xau ’); readln (x); For i:=1 to length(x) If x[i]= ‘ ’ then delete(x,i,1); Writeln(‘ xau da loai bo dau cach la: ’,x); readln End ...

Ngày tải lên: 11/08/2014, 05:22

... trình tập 3: Program xaunguoc; Uses Crt; Var St: String[80]; i:Byte; Begin Write(‘Nhap xau St: ‘); Readln(St); For i:=length(St) downto write(St[i]); Write( Xau nguoc cua xau st la: ‘, St); Readln; ... thuộc vận dụng em thấy kì diệu tin học Chương trình tập 4: Program baitap3; Uses Crt; Var St: String[25]; i:Byte; Begin Write(‘Nhap xau St: ‘); Readln(St); Write(‘ket qua la: ‘); For i:=1 to length(St) ... nhiều cách tay giơ lên Chương trình mà em học sinh sửa sau: Program baitap5; Uses Crt; Var St: String[25]; i:Byte; Begin Write(‘Nhap xau St: ‘); Readln(St); Write(‘ketqua la:’); For i:= length(St)...

Ngày tải lên: 02/03/2015, 14:02

... ASCII lớn xâu B + Xâu B đoạn đầu xâu A Ví dụ ‘Tin hoc’ = ‘Tin hoc’ ‘Dien Bien’ > ‘DienBien’ Xau < Xau ki tu’ b Các thủ tục hàm chuẩn xử lí xâu THỦ TỤC Delete(S,vt,n) Insert(S1,S2,vt) Ý NGHĨA ... xâu Xử lí xâu THỂ HIỆN BẰNG PASCAL Var a,b: string; BEGIN Write(‘ Nhap xau ho ten thu nhat :’); Readln(a); Write(‘Nhap xau ho ten thu hai :’); Readln(b); IF Length(a)>Length(b) Then write(a)...

Ngày tải lên: 09/07/2015, 13:29

Ngày tải lên: 16/08/2012, 11:49

... Trung Tâm CNTT – Bài T p Th c Hành CTDL> Module Bài Vi t hàm tính t ng S=1+1/2+1/3…+ 1/N S d ng hàm ñ tính S ngư i dùng nh p N Bài Nh p s a ... by Foxit Corporation,2005-2009 Trung Tâm CNTT For Evaluation Only – Bài T p Th c Hành CTDL> Module Bài Nh p s n C(k,n)=n!/(k!*(n-k)!) k nguyên Tính t h p ch p k c a n theo công th c sau Bài ... by Foxit Corporation,2005-2009 Trung Tâm CNTT For Evaluation Only – Bài T p Th c Hành CTDL> Module Bài VCT nh p vào phân s a/b c/d Hãy tính t ng c a phân s này, yêu c u phân s k t qu ph i ví...

Ngày tải lên: 16/08/2012, 14:00

... Lan100,000TV0 1Tap 100 giay mongquyenTrung T T q Q Quoc2,500TV0 2Tap 200 giay mongquyenTrung T T q Q Quoc4,500TV0 3Tap 100 giay totquyenViet Nam3,000TV0 4Tap T T q V T 200 giay totquyenViet Nam5,500TV0 5Tap ... MONHOCMAMHTENMHTCLTTCTHMAKHOATHDCTin hoc dai M T T T M T c cuong41KHMTCTRRCau truc roi rac50KHMTCSDLCo so du K C C K C lieu HTTTCTDLGTCau truc du lieu va giai thuat31KHMTPTTKTTPhan tich l 31H C C K P thiet ke thuat toan30KHMTDHMTDo ... mà giáo viên có tên “Nguyen To Lan” dạy môn “Co So Du Lieu In danh sách môn học (mã môn học, tên môn học) phải học liền trước môn “Co So Du Lieu 10 Môn “Cau Truc Roi Rac” môn bắt buộc phải học...

Ngày tải lên: 01/09/2012, 09:44

... dem_nut_day _du( NODE *root) { if (root == NULL) return 0; else if (root->left != NULL && root->right != NULL) return dem_nut_day _du( root->left) + dem_nut_day _du( root->right) + 1; else return dem_nut_day _du( root->left) ... dem_nut_day _du( root->left) + dem_nut_day _du( root->right); } void main() { int tong_nut_day _du, tong_nut_la; khoi_tao_cay(&root); nhap_cay(&root); tong_nut_day _du = dem_nut_day _du( root); tong_nut_la = dem_nut_la(root); ... { tim(); getch(); } /* Bai tap 3_67 - Quan ly hai STACK chi dung day */ #include #include #include #define...

Ngày tải lên: 26/10/2012, 14:08

... tìm tất khoá cho lược đồ quan hệ sau: Q(BROKER,OFFICE,STOCK,QUANTITY,INVESTOR,DIVIDENT) F={STOCK→DIVIDENT,INVESTOR→BROKER,INVESTOR,STOCK→QUANTITY, BROKER → OFFICE} 5.6 Cho Q(A,B,C,D) F=[ AB → C; ... NGAYDAY, TUTIET, ĐENTIET, BAIDAY, GHICHU) b Xem lịch báo giảng ngày 08/09/2003 giáo viên có mã khoa CNTT Yêu cầu: MAGV, HOTEN, TENLOP, TENMH, PHONG, NGAYDAY, TUTIET, ĐENTIET, BAIDAY, GHICHU) c Cho ... dạy lớp nào, ngày (NGAYDAY), môn gì?, phòng nào, từ tiết (TUTIET) đến tiết (ĐENTIET),tựa đề dạy (BAIDAY), ghi (GHICHU) tiết dạy này, dạy lý thuyết (LYTHUYET) hay thực hành - giả sử LYTHUYET=1 dạy...

Ngày tải lên: 24/01/2013, 16:22

... while (Tnil) and (retrieve(T,L1)

Ngày tải lên: 25/04/2013, 20:35

Ngày tải lên: 12/06/2013, 01:25

... lâu dài nhớ (đĩa từ, CD, ) không bị tắt nguồn điện Lượng thông tin lưu trữ tệp lớn phụ thuộc vào dung lượng đĩa Phân loại tệp Có hai loại tệp thường dùng: Tệp có cấu trúc Là tệp mà phần tử tổ...

Ngày tải lên: 22/06/2013, 01:25

... cặp ngoặc vuông Tên biến [ i ] ; i : thứ tự kí tự Ví dụ: Name[1] có nội dung ‘N’ Name[5] có nội dung ‘ ‘ Name[7] có nội dung ‘’ Name[9] không xác định kiểu xâu tối đa kí tự  Các kí tự xâu đánh ... không Chương trình : Var x, y : Byte; a, b : String; Begin Write ( ‘Nhap xau thu nhat : ‘); Readln (a); Write ( ‘Nhap xau thu hai : ‘); Readln (b); { xác định độ dài xâu b để biết vị trí kí tự ... hình xâu viết theo thứ tự ngược lại 2 Chương trình : Program dao_nguoc _xau; Var i, k :Byte; a : String; Begin Write (‘ Nhap xau : ‘); Readln(a); k := length (a); { xác định độ dài xâu} For i :=...

Ngày tải lên: 29/06/2013, 01:25

Ngày tải lên: 19/08/2013, 19:10