nhung bai tap lap trinh c

Ngày tải lên: 09/08/2012, 23:24

... 15 Thay thế tất c c c từ “em” trong c u thành “anh”. Nếu không c từ “em” thì báo là không c Private Sub Command1_Click() Text1.Enabled = True End Sub Private Sub Command2_Click() Dim s As String, ... pt Private Sub cmdAC_Click() mh.Text = "" End Sub Private Sub cmdchia_Click() so1 = Val(mh.Text) pt = "/" mh.Text = "" End Sub Private Sub cmdcong_Click() so1 = Val(mh.Text) pt ... i End Sub Bài 12 Đếm số từ ‘Pascal’ (không phân biệt chữ thường, chữ in) trong c u Private Sub Command1_Click() Text1.Enabled = True End Sub Private Sub Command2_Click() Dim s As String * 50 Dim...

Ngày tải lên: 17/08/2012, 10:50

... xuất c c thông tin: Mã ASCII, key code, scan code,… Bài 2: Viết chương trình xuất một chuỗi lên giữa vùng c a sổ client. Sau đó c thể dùng c c phím di chuyển để dịch chuyển chuỗi trên vùng c a ... BÀI TẬP CHƯƠNG 4 Bài 1: Viết chương trình chặn c c thông điệp bàn phím và thông điệp chuột - Khi người dùng click chuột thì thông báo nút chuột vừa đư c nhấn c ng với tọa độ c a chuột - Khi ... Viết chương trình vẽ một hình vuông ở giữa vùng c a sổ client. Sau đó c thể dùng c c phím di chuyển để dịch chuyển hình vuông trên vùng c a sổ. Bài 4: Viết chương trình, khi người dùng click chuột...

Ngày tải lên: 12/09/2012, 16:16

... OK, ứng dụng sẽ kiểm tra c c thông tin trong c c text box. Nếu người dùng chưa nhập thông tin vào một trong c c text box, ứng dụng sẽ báo lỗi. - Khi người dùng nhấn nút Close, form Student Detail ... Viết ứng dụng minh họa c ch sử dụng dialog c giao diện như trong hình vẽ - Sau khi người sử dụng chọn c c loại nút sẽ hiển thị, icon sẽ hiển thị và nhấn nút Display chương trình sẽ hiển thị ... icon sẽ hiển thị và nhấn nút Display chương trình sẽ hiển thị lên dialog tương ứng với c c thông số đã đư c chọn. Ví dụ: - ...

Ngày tải lên: 12/09/2012, 16:16

... Đầu ra f2 c trị 1 khi (ngư c lại c trị 0) C u 3 ( 3 điểm): Cho hàm - Lập bảng chân trị cho hàm f. - Rút gọn hàm f (kết quả rút gọn ở dạng tổng c c tích) - Vẽ sơ đồ mạch số cho hàm f. C u 3 ( ... điểm): Cho hàm a. X c định bảng chân trị. b. Rút gọn hàm f (kết quả rút gọn gọi là hàm g ở dạng tích c c tổng) c. Vẽ sơ đồ mạch số cho hàm g. d. Vẽ sơ đồ mạch số cho hàm g mà chỉ sử dụng c ng ... 1 0 C u 4 (3 điểm): Cho hàm a. Lập bảng chân trị cho hàm f. b. Rút gọn hàm f (kết quả rút gọn ở dạng tích c c tổng) c. Vẽ sơ đồ mạch số cho hàm f. C u 2 ( 3 điểm): Cho hàm bool f(A, B, C, D)...

Ngày tải lên: 12/09/2012, 16:40

Ngày tải lên: 13/09/2012, 09:21

Ngày tải lên: 13/09/2012, 09:21

Ngày tải lên: 13/08/2013, 16:40

Ngày tải lên: 13/08/2013, 16:40

Ngày tải lên: 14/08/2013, 15:03

... END; END; {========================================================== ==========} PROCEDURE AH(ROOT,LAST:INTEGER); VAR KEY:CANH;CON:INTEGER; BEGIN KEY:=E[ROOT]; WHILE ROOT*2<=LAST DO BEGIN CON:=ROOT*2; IF (CON<LAST)AND(E[CON+1] .C& lt;E[CON] .C) THEN INC(CON); ... KEY .C& lt;=E[CON] .C THEN BREAK; E[ROOT]:=E[CON]; ROOT:=CON; END; E[ROOT]:=KEY; END; {========================================================== ==========} PROCEDURE KRUSKAL; VAR I,R1,R2,COUNT,A:INTEGER;TMP:CANH; BEGIN ... WRITELN(F2,'(',U,',',V,')=' ,C) ; INC(COUNT); W:=W +C; END; IF COUNT=N-1 THEN BREAK; END; WRITELN(F2,'TONG =',W); END; END; {========================================================== ==========} BEGIN CONST...

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

... dam bao nhung dinh khong co diem ke thi trong so =Maxint *) end; for i:=2 to n do {Lap n-1 buoc xac dinh cac canh cua cay khung BE NHAT} begin program Prim_Algorithm;{chuong trinh nay cai dat ... integer; begin {khoi tao mang dinh ke` cua ca&apos ;c dinh 2,3, ,n la` dinh 1} for v:=2 to n do begin DinhKe[v]:=1; CanhKe[v]:=TrongSo[1,v]; (* Do da chuyen cac canh co' trong so'=0 tha`nh ... writeln(' Hay bam phim chuc nang:'); Writeln; writeln(' K(eyboard). Chay chuong trinh - Du lieu nhap tu ban phim.'); Writeln; writeln(' F(ile). Chay chuong trinh - Du lieu lay...

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

... boolean; Begin #80:if chon<max then inc(chon) else chon:=1; #72:if chon>1 then dec(chon) else chon:=max; end; Until kt=#13; Taomenu:=chon; End; { Nhap } Procedure NHAP; Var ch,i : byte; tieude ... Writexyso(i*4-3,dong,old,i);Writexyso(j*4-3,dong,old,j);delay(tg); End; { Chon truc tiep (Selection Sort) } Procedure SelectionSort(var a:m1;n:byte); Var i,j,min: byte; Begin Writexychuoi(28,5,'Chon Truc Tiep (Selection Sort) ',14);{14} clr; For ... : mang; Begin clrscr; tieude[1]:='1. Nhap bang co che sinh so ngau nhien'; tieude[2]:='2. Nhap tu Ban phim '; ch:=taomenu(30,8,2,tieude); clrscr; case ch of 1:nhapdulieu(a); ...

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

... KETQUA Cau hoi 01: Tao CSDL, cac bang va cac khoa ngoai cho tren 02: Xoa cac rang buoc khoa ngoai tham chieu den bang SINHVIEN va bang MONHOC 03: Xoa bang KHOA va MONHOC 04: Tao lai cac bang va cac ... biet ket qua hoc tap cua sinh vien co ma S007 12: Liet ke nhung sinh vien sinh vao ngay 03 thang 07 13: Cho biet danh sach sinh vien ma ho co chua chu Anh 14: Cho biet ket qua hoc tap gom: HOSV, ... da xoa o cau 2 va 3 05: Nhap du lieu cho tat ca cac bang 06: Sua so tiet cua mon "Tri Tue Nhan Tao" lai 30 tiet 07: Xoa ket qua cua sinh vien co ma S001 08: Chen lai cac bo cua sinh...

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

... java.util.Scanner; public class Main { public static void phanTich(int n){ 4 } } else { check=0; // break; } } //if(i==0)check=0; } }catch(Exception e){} } } Bài 12 : package bai1 2; import ... ; }while(i>=0); }while(tich!=1); } } Bài 10 : package bai1 0; import java.util.Scanner; public class Main { public static int nhap(){ Scanner input= new Scanner(System.in); boolean check= false; int n=0; while(!check){ System.out.print(" ... "); lietKe(n); } } Bài 06 : package bai0 6; import java.util.Scanner; public class Main { public static void lietKe(int n){ int i=2,count=0; while(count<n){ if(cachamchung.checkSNT(i)){ System.out.print("...

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

Ngày tải lên: 20/08/2013, 15:35

Ngày tải lên: 20/08/2013, 15:35

Ngày tải lên: 20/08/2013, 15:35

Ngày tải lên: 20/08/2013, 15:35