bai tap ve khuc xa

Ngày tải lên: 17/09/2013, 17:10

... >I&'M#> 'S++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++VV V+dP=S++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++Vf V+d+VL<E=S++++++++++++++++++++++++++++++++++++++++++++++++++++++++...

Ngày tải lên: 19/12/2013, 14:02

... 3: Program xaunguoc; Uses Crt; Var St: String[80]; i:Byte; Begin Write(‘Nhap xau St: ‘); Readln(St); For i:=length(St) downto 1 do write(St[i]); Write(‘Xau nguoc cua xau st la: ... sự kì diệu của tin học. Chương trình bài 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 ......

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

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

... duyệt Chương trình phát triển kinh tế - xã hội các xã đặc biệt khó khăn miền núi và vùng sâu, vùng xa. - Nhân dân các dân tộc thiểu số vùng Tâu Nguyên theo Quyết định số 168/2001/QĐ-TTg ngày 30/10/2001

Ngày tải lên: 06/04/2013, 08:45

Ngày tải lên: 01/08/2013, 05:41

... nhau. PROGRAM bai1 10_tr80; USES wincrt; VAR a:String[100]; ds,n,i:byte; label l; BEGIN l: CLRSCR; write('nhap xau a= ') ;readln(a); n:=length(a); If n>100 then begin write('xau ... or (a[i]='9') then ds:=ds+1; write('xau ',a,' co ',ds,' ki tu so '); Bài 10 trang 80 C2: PROGRAM bai1 10_tr80; USES wincrt; VAR a:String[1...

Ngày tải lên: 14/09/2013, 15:10

... ra lần 2 là bi xanh. b. Biết 2 bi lấy lần 2 là 2 bi xanh. Tìm xác suất để 2 bi xanh lấy ra đó là 2 bi xanh của hộp lúc ban đầu. Bài 45. Có 2 chiếc hộp: Hộp 1: Có 6 bi đỏ và 4 bi xanh Hộp 2: Có ... đỏ và 4 bi xanh. Lần 1 lấy ngẫu nhiên từ hộp ra 1 bi, nếu là bi đỏ thì bỏ bi đỏ đó trở lại hộp và thêm vào 2 bi đỏ nữa, nếu là bi xanh thì bỏ bi xanh đó trở lại hộp và thêm vào 4 bi xanh nữa. ... hộ...

Ngày tải lên: 25/09/2013, 15:10