bài tập pascal rất hay

... Bài tập 3: Viết chương trình nhập vào dãy số nguyên (a) n (b)m, m≤n Kiểm tra xem dãy {b} có phải dãy dãy {a} không? Bài tập 4: Viết chương trình nhập vào dãy ... A[n,n] Bài 10: Tìm phần tử cảu ma trận vuông MIN MAX phần tử nằm đường chéo Bài 11: Viết chương trình xếp phần tử ma trận vuông A[n,n] cho phần tử tăng dần theo đường zigzag hình vẽ Bài tập 11: ... lại theo thứ tự tăng dần tổng phần tử dòng Bài 6: Tìm điểm cực tiểu mảng hai chiều Một phần tử gọi điểm cực tiểu mảng chiều A[m.n] không lứon phần tử kề Bài 7: Tìm " Phần tử yên ngựa" cuả mảng hai...

Ngày tải lên: 16/07/2013, 01:26

... bcbsaaba b3 Bài 11: Từ dài In từ dài xâu nhập từ bàn phím số ký tự từ này? Nếu có nhiều từ có độ dài in hết ví dụ: Input Output Nguyen van truong truong Truong thich hoc pascal Truong pascal Bài 12: ... lan nao 9999999 Bài : Sắp số xâu Nhập xâu s bao gồm số kí tự, in xâu xếp số theo thứ tự tăng dần vò trí kí tự giữ nguyên? Input Output abc6ghj7kkkkk1hhhh9 abc6ghj7kkkkk1hhhh9 Bài 10: KÝ TỰ NHIỀU ... dơ: (A) = (1 3 1) Th«ng b¸o: SO HANG XUAT HIEN NHIEU NHAT LA SO: VI TRI TUONG UNG TRONG DAY LA: Bài : XẾP GẠCH Minh thích trò chơi xếp hộp có hình viên gạch Minh đặt viên gạch chồng lên xây thành...

Ngày tải lên: 20/07/2013, 01:28

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

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

Ngày tải lên: 15/09/2014, 20:19

... kết Hidro bị phá vỡ trình Bài 3:Một phân tử AND Ecoli có A=9000 Nu Tỷ lệ A/G=2/3.Phân tử AND tái liên tiếp lần Hãy xác định : a.Số Nu loại cần cung cấp cho trình tự BÀI TẬP TUYỂN CHỌN AND ĐỖ MẠNH ... c.64 d.128 Bài 21:Vùng mã hóa gen sinh vật nhân chuẩn mở đầu đoạn e xôn kết thúc đoạn e xôn Tổng số đoạn đoạn intron vùng mã hóa Số đoạn e xôn gen là: a.7 b.4 c.5 d.6 NHÂN ĐÔI ADN Bài 1:ĐH 2011:Gen ... A=450, T=150,G=150,X=750 Bài 18: Một gen sinh vật nhân chuẩn có đoạn intron.Hãy xác định số đoạn exon gen biết intron đoạn cuối mARN chưa trưởng thành a.2 b.3 c.4 d.5 Bài 19: Một đoạn phân tử...

Ngày tải lên: 18/06/2015, 18:47

... ',kqua); Readln; End BÀI TẬP TỰ GIẢI Bài tập 6.11: Viết chương trình nhập vào xâu ký tự từ bàn phím Tìm in hình từ có độ dài lớn xâu Gợi ý: Tách từ để so sánh (xem tập 5) Bài tập 6.12: Viết chương ... Writeln(Dong[i]:4); End; Readln; End BÀI TẬP TỰ GIẢI Bài tập 5.13: Viết chương trình nhập vào dãy số thực số thực x Thông báo lên hình số lượng phần tử dãy x vị trí chúng Bài tập 5.14: Nhập vào mảng số ... S.') Else Writeln('Diem P nam ngoai da giac S.'); Readln; End BÀI TẬP TỰ GIẢI Bài tập 7.4: Viết chương trình nhân hai số phức c1, c2 Bài tập 7.5: Viết chương trình quản lý điểm thi học phần sinh...

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

... bcbsaaba b3 BÀI 4: TỪ DÀI NHẤT In từ dài xâu nhập từ bàn phím số ký tự từ này? Nếu có nhiều từ có độ dài in hết ví dụ: Input Output Nguyen van truong truong Truong thich hoc pascal Truong pascal BÀI ... (n6) Bài tốn: Cho trước số hạng dãy 6174 Cho biết số số hạng cuối (là số hạng 6174) dãy Dữ liệu: Cho tập tin văn DL6174.INP, gồm dòng gồm số ngun dương số hạng dãy số 6174 Kết quả: Cho tập tin ... 43528796 BÀI 6: XOÁ KÝ TỰ TRÙNG Viết chương trình nhập vào xâu xoá hết ký tự liên tiếp giống xâu chừa lại một? Input Output cccccaaannnnooo cano yeseeeyysss yeseys Gv: Trần Minh Thọ 2/5 BÀI 7:...

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

... Delete(S,1,1); BÀI TẬP CƠ BẢN TRANG 34 BÀI TẬP CƠ BẢN While (S[length(S)] = #32) Delete(S,length(S),1); Write('Chuoi sau da bien doi la: ', S); Readln; END BÀI TẬP CHƯƠNG 6: DỮ LIỆU KIỂU TẬP Bài : Bạn ... '); Readln; END BÀI TẬP CHƯƠNG 4: CẤU TRÚC DỮ LIỆU MẢNG Bài : Giải hệ phương trình tuyến tính hai ẩn dùng ma trận : a11x + a12y = c1 a21x + a22y = c2 BÀI TẬP CƠ BẢN TRANG 21 BÀI TẬP CƠ BẢN GIẢI ... BEGIN Clrscr; Nhap; Tinh_ngay_nghi; BÀI TẬP CƠ BẢN TRANG 49 BÀI TẬP CƠ BẢN Inkq; Write('Ban Enter de ket thuc '); Readln; END BÀI TẬP CHƯƠNG 8: KIỂU FILE Bài : Hãy lập chương trình tạo tệp số...

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

... điều kiện dạng đầy đủ Pascal? Câu 2: Cho câu lệnh sau: a) if (15 mod 2) = then X:= X + b) if X > then X:= X + 1; Giá tri X giá trị X trước Câu 3: Các câu lệnh Pascal sau viết hay sai? a) if x:= ... writeln('Day chi la ba canh cua tam giac thuong'); readln; end Bài8 : Viết chưong trình nhập số tự nhiên vào máy tính ghi hình kết số nhập số chẳn hay lẽ Program chan_le; Uses crt; Var n:real; Begin Clrscr; ... Writeln(‘x=’,dx/dd,’va y=’,dy/dd); End; Readln; End Bài 11:Nhập vào tâm bán kính đường tròn.Sau nhập vào điểm A(x,y) kiểm tra xem có thuộc đường tròn hay không? Program KIEMTRADIEMTHUOCDUONGTRON; Uses...

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

... điều kiện dạng đầy đủ Pascal? Câu 2: Cho câu lệnh sau: a) if (15 mod 2) = then X:= X + b) if X > then X:= X + 1; Giá tri X giá trị X trước Câu 3: Các câu lệnh Pascal sau viết hay sai? a) if x:= ... trình Pascal là: A Const B Var C Real D End Câu 49: Để chạy chương trình Pascal ta nhấn tổ hợp phím A Ctrl+F9 B Alt+F9 C Shitf+F9 D Ctrl+Shift+F9 Câu 50: Cấu trúc chung hợp lý chương trình Pascal ... Writeln(‘x=’,dx/dd,’va y=’,dy/dd); End; Readln; End Bài 11:Nhập vào tâm bán kính đường tròn.Sau nhập vào điểm A(x,y) kiểm tra xem có thuộc đường tròn hay không? Program KIEMTRADIEMTHUOCDUONGTRON; Uses...

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

... tong + 1/i ; i := i + ; End ; Writeln (' Tong can tim la : ', tong:12:6 ) ; Readln ; END Bài tập 10: Bài tốn tính a mũ n Uses Crt ; Var i , n : Integer ; a , giatri : Real ; BEGIN Clrscr ; Write ... day sau sap xep la '); for i:=1 to n write(' ', a[i]); readln; end Bài tập 12: Nhập xâu cho trước kiểm tra có phải xâu đối xứng hay khơng? Uses Crt; Var St : string; dx : Boolean; i, len: byte; ... 15 Then Writeln(' Ban da trung tuyen ') Else Writeln(' Ban khong trung tuyen ') ; Readln ; END Bài tập 6: Nhập hai số a,b cho trước, nhập phép tính cuẩ b,các phép tính cộng, trừ, nhân,chia Hiển...

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

... đúng? A Điều kiện khí hậu, thổ nhỡng,thay đổi làm cho kiểu gen giống lúa X bị thay đổi theo B Năng suất thu đợc giống lúa X hoàn toàn môi trờng sống quy định C Tập hợp tất kiểu hình thu đợc suất ... a: Cú A = T = 180 (nu) G = X = 270 (nu) Vy t bin ca gen A l thay th cp AT bng cp GX b) Vi gen cú cu trỳc mch, dng t bin im lm thay i t l no vỡ luụn cú : A = T; G = X -> t l A+G luụn khụng i ... kiu hỡnh cũn li F 2? Bi gii: 4800 = 0, 24 hay 24% Rừ rng t l ny c xut hin T l cõy lỏ qun, ht trng F2 bng 20000 khụng th phõn li c lp ca cỏc gen (3/16) hay liờn kt gen (1/4), m hoỏn v gen xy Kiu...

Ngày tải lên: 24/05/2014, 18:27

... bcbsaaba b3 BÀI 4: TỪ DÀI NHẤT In từ dài xâu nhập từ bàn phím số ký tự từ này? Nếu có nhiều từ có độ dài in hết ví dụ: Input Output Nguyen van truong truong Truong thich hoc pascal Truong pascal BÀI ... (n6) Bài tốn: Cho trước số hạng dãy 6174 Cho biết số số hạng cuối (là số hạng 6174) dãy Dữ liệu: Cho tập tin văn DL6174.INP, gồm dòng gồm số ngun dương số hạng dãy số 6174 Kết quả: Cho tập tin ... 43528796 BÀI 6: XOÁ KÝ TỰ TRÙNG Viết chương trình nhập vào xâu xoá hết ký tự liên tiếp giống xâu chừa lại một? Input Output cccccaaannnnooo cano yeseeeyysss yeseys Gv: Trần Minh Thọ 2/5 BÀI 7:...

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

... ');readln(k); Writeln('C(',n,',',k,') = ',c(n,k):6:0); Readln; End Bài 29: Lập tam giác PASCAL, Cn k(dùng chương trình con) n Program TAM_GIAC _PASCAL; Uses Crt; Var i,j,n,k:integer; Trang 12 Function gt(n:integer):longint; ... While not eof(f) Begin read(f,i); write(i:3); End; Readln; End Bài 60: Mở file số nguyên có đĩa, chép nội dung sang tập tin in nội dung tập tin sau chép hình Program COPY_FILE; Trang 37 Uses Crt; ... : ', phut, 'phut : ', x, 'giay'); Readln; End Bài 11: Nhập vào tâm bán kính đường tròn Sau nhập vào điểm A(x, y) kiểm tra xem có thuộc đường tròn hay không? Program KIEM_TRA_DIEM_THUOC_DUONG_TRON;...

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

Ngày tải lên: 12/10/2014, 07:55

... doi la: ', S); Readln; END BÀI TẬP CHƯƠNG 6: DỮ LIỆU KIỂU TẬP Bài : Bạn viết hàm Card(A) đếm số phần tử tập hợp A cho trước có kiểu Set Of 99 (* hàm đếm số phần tử tập hợp *) Uses Crt; Type Tap=set ... Readln(a[i, j]); a[j,i]:=a[i,j]; End; Readln ; END ; GV : Võ Thị Sen 10 BÀI TẬP CƠ BẢN BÀI TẬP CHƯƠNG 4: CHƯƠNG TRÌNH CON Bài : Dùng thủ tục chuyển số tự nhiên n cho trước sang hệ số GIẢI Procedure ... GV : Võ Thị Sen 25 BÀI TẬP CƠ BẢN Writeln('Cac phan tu lai cua tap hop la:'); For ch:='a' to 'z' If ch in tap then Write(ch,' '); Readln; END BÀI TẬP CHƯƠNG 7: KIỂU RECORD Bài : Thông tin học...

Ngày tải lên: 23/01/2015, 17:00

... hàm Card(A) đếm số phần tử tập hợp A cho trước có kiểu Set Of 99 Bài :Bạn lập chương trình tạo tập hợp số nguyên chẵn kiểu Byte loại khỏi số chia hết cho Kết thể hình Bài :Xét chương trình sau ... qua phím khác Bài :Viết chương trình có chức thêm phần tử vào tập hợp trực tiếp từ bàn phím loại bớt phần tử khỏi tập hợp trực tiếp từ bàn phím CÊU TRóC D÷ LIƯU KIĨU RECORD Bài :Thông tin học ... quan = THµNH C«NG Bài :Nhập số tự nhiên N viết chương trình tạo mảng bao gồm N số nguyên tố Bài :Viết chương trình nhập bảng số x với điều kiện số nhập hình vò trí bảng số Bài :a b Viết chương...

Ngày tải lên: 09/05/2015, 16:00

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

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