bài tập pascal cơ bản lớp 11

... b:=tam; writeln(‘gia tri a=’,a); writeln(‘gia tri b=’,b); readln; end Bài 6: Viết chương trình nhập số a b Tìm giá trị lớn nhỏ số Bài 7: Viết chương trình nhập số từ bàn phím, tìm số lớn số đó, in ... s:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln(‘chu vi=’,cv:9:2); writeln(‘dien tich=’,s:9:2); readln; end Bài 5: Viết chương trình nhập vào hai số a, b sau hoán đổi giá trị hai số var a,b,tam:integer; begin ... max:=a; if b>max then max:=b; if c>max then max:=c; writeln(‘so lon nhat la:’,max); readln; end Bài 8: Viết chương trình nhập vào số N Kiểm tra N chẵn hay lẻ var N:Integer; begin write(‘nhap N):’);readln(N);

Ngày tải lên: 07/08/2022, 07:48

... 100 bài tập Turbo Pascal BÀI TẬP TURBO PASCAL I. Làm quen với chương trình Pascal – Khai báo, sử dụng biến – Các thủ tục vào ra. Bài tập 1.1: Viết chương trình tính ... readln end Bài tập 3.7 In bảng cửu chương n (Với n nhập từ bàn phím) a.Hướng dẫn : b Mã chương trình: Program Cuu_Chuong_1; uses crt; var n, i : integer; Trang 17 100 bài tập Turbo Pascal ... la:',s:10:2); readln end. Trang 2 100 bài tập Turbo Pascal b. Nhận xét: Ở đây ta lại hai lần dùng biến trung gian p, s để chương trình sáng sủa, dễ theo dõi. Bài tập 1.5: Viết chương trình cho phép

Ngày tải lên: 08/06/2015, 23:27

... Trần Văn Chung trường THPT Hồng Văn Thụ Nha Trang Bài? ?tập? ?pascal? ?cơ? ?bản? ?đến nâng cao theo chương trình TIN  HỌC? ?lớp? ?11? ?khơng phân ban Nhằm giúp các bạn học sinh? ?lớp? ?11? ?tiếp cận với ngơn ngữ lập trình? ?Pascal? ?một cách dễ  dàng và vận dụng vào các ngơn ngữ lập trình khác trong tin học, tơi sưu tầm và biên soạn một  ... cho các? ?bài? ?kiểm tra về mơn tin học Nha trang tháng 3/2 011 ĐT  :  0972. 311. 481 Trang 1 Trần Văn Chung trường THPT Hồng Văn Thụ Nha Trang Phần I  :  CÁC BÀI TẬP CƠ BẢN Bài? ?1:  Tìm giá trị lớn nhất trong 4 số a, b, c, d (a, b, c, được nhập từ bàn phím) ... dàng và vận dụng vào các ngơn ngữ lập trình khác trong tin học, tơi sưu tầm và biên soạn một  số? ?bài? ?tốn? ?cơ? ?bản? ?đến nâng cao có trong chương trình của? ?lớp? ?11? ?khơng  phân ban. Các  chương trình nhằm mục đích tham khảo cho các bạn ham mê tin học và là tài liệu chuẩn bị  cho các? ?bài? ?kiểm tra về mơn tin học

Ngày tải lên: 30/01/2020, 16:57

... THPT Hoàng Văn Thụ Nha Tr ang Bài tập pascal đến nâng cao theo chương trình TIN HỌC lớp 11 khơng phân ban Nhằm giúp bạn học sinh lớp 11 tiếp cận với ngơn ngữ lập trình Pascal cách dễ dàng vận dụng ... ĐT: 0972. 311. 481 Trang Tr ần Văn Chung trường THPT Hoàng Văn Thụ Nha Tr ang Phần I: CÁC BÀI TẬP CƠ BẢN Bài 1: Tìm giá trị lớn số a, b, c, d (a, b, c, nhập từ bàn phím) Program Program TIM_SO_LON_NHAT; ... có chương trình lớp 11 khơng phân ban Các chương trình nhằm mục đích tham khảo cho bạn ham mê tin học tài liệu chuẩn bị cho kiểm tra môn tin học Nha trang tháng 3/2 011 ĐT: 0972. 311. 481 Trang Tr

Ngày tải lên: 21/03/2023, 14:36

... THPT Hoàng Văn Thụ Nha Tr ang Bài tập pascal đến nâng cao theo chương trình TIN HỌC lớp 11 khơng phân ban Nhằm giúp bạn học sinh lớp 11 tiếp cận với ngơn ngữ lập trình Pascal cách dễ dàng vận dụng ... ĐT: 0972. 311. 481 Trang Tr ần Văn Chung trường THPT Hoàng Văn Thụ Nha Tr ang Phần I: CÁC BÀI TẬP CƠ BẢN Bài 1: Tìm giá trị lớn số a, b, c, d (a, b, c, nhập từ bàn phím) Program Program TIM_SO_LON_NHAT; ... có chương trình lớp 11 khơng phân ban Các chương trình nhằm mục đích tham khảo cho bạn ham mê tin học tài liệu chuẩn bị cho kiểm tra môn tin học Nha trang tháng 3/2 011 ĐT: 0972. 311. 481 Trang Tr

Ngày tải lên: 14/08/2023, 10:27

... bạn học sinh lớp 11 tiếp cận với ngôn ngữ lập trình Pascal một cách dễ dàng và vận dụng vào các ngôn ngữ lập trình khác trong tin học, tôi sưu tầm và biên soạn một số bài toán cơ bản đến nâng ... của lớp 11 không phân ban. Các chương trình nhằm mục đích tham khảo cho các bạn ham mê tin học và là tài liệu chuẩn bị cho các bài kiểm tra về môn tin học. Nha trang tháng 3/2 011 ĐT : 0972. 311. 481 ... :=c/2; s :=sqrt(p*(p-a)*(p-b)*(p-c)); Writeln(‘ba so vua nhap la ba canh cua tam giac’); ĐT : 0972. 311. 481 Trang 2 Trần Văn Chung trường THPT Hoàng Văn Thụ Nha Trang Writeln(‘ chu vi cua tam gia

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

... Bài 1: Nhập vào cạnh hình chữ nhật In hình diện tích chu vi Program HINH_CHU_NHAT; Uses Crt; Var ... Writeln('Dien tich hinh chu nhat la:’,s:6:2); Writeln('Chu vi hinh chu nhat:',c:6:2); Readln; End Bài 2: Nhập vào bán kính hình trịn In hình diện tích chu vi Program HINHTRON; Uses Crt; Var r,dt,cv:real; ... Writeln('Dien tich hinh tron la:',dt:6:2); Writeln('Chu vi hinh tron la:',cv:6:2); Readln; End Bài : Tính tam giác: Nụâp vào ba số a,b,c Kiểm tra xem độ dài ba cạnh hay khơng, khơng in hình '

Ngày tải lên: 25/03/2022, 09:18

... Trang 1Bài tập pascal cơ bản dành cho hs-svthiết kế bởi: Vũ Đức Quang for i:=1 to n do begin if i mod 2=0 then ... readlnCó thể biến đổi đề bài của bài toán đi như: tính số phibonaci thứ n hoặc nhập vào 1 số kiểm tra xem số đó có phải là số phibonaci hay không…Các bài đó làm tương tự .Bài 19: Nhập số nguyên ... readlnEND .Bài 14:Nhập vào 1 xâu kí tự và cho biết xâu vừa nhập vào có bao nhiêu nguyên âm và bao nhiêu kí tự số.Lời giải:uses crt;var s:string;dem1,dem2,i:byte;BEGINTrang 8Bài 15:Lập trình giải bài

Ngày tải lên: 23/10/2013, 20:15

... Bài tập cơ bản Tập I Các bài tập cơ bản Bài 1. Viết chơng trình nhập số nguyên dơng N<=1000 và N số nguyên A[1], ... hình các ô vuông có điểm chung - 1 Bài tập cơ bản Tập I với đờng chéo của hình chữ nhật đi từ góc trái trên của ô [1,1] đến góc phải dới của ô [M,N]. Bài 9. Viết chơng trình nhập số nguyên ... B, C có lập thành một tam giác không? - 2 Bài tập cơ bản Tập I 2. Nếu ABC là một tam giác, hãy xét xem điểm D có nằm bên trong tam giác này không? Bài 20. Viết chơng trình nhập số nguyên dơng

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

... Clrscr; Writeln('VIET TAM GIAC PASCAL: '); Writeln(' ... Writeln(td:6, tn:12, tg:15); Readln; End Trang 9 Bài 23: Tạo bảng số dạng sau: 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 Program ... Writeln('C(',n,',',k,') = ',c(n,k):6:0); Readln; End Bài 29: Lập tam giác PASCAL, bằng 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 ... Write(i:3) End; Readln; End Bài 24: Tạo hình a) * ** *** **** ***** b) *****... readln(n); For i:=0 to n do Begin For j:=0 to i do Write(C(j,i):3:0); Writeln; End; Readln; End Bài 30: Viết các chương

Ngày tải lên: 06/02/2015, 08:00

... C:=gt(n)/(gt(k)*gt(n-k)); End; Begin Clrscr; Writeln('VIET TAM GIAC PASCAL: '); Writeln(' .. .Bài 23: Tạo bảng số dạng sau: 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 Program BANG_SO; Uses crt; Var ... Writeln('C(',n,',',k,') = ',c(n,k):6:0); Readln; End Bài 29: Lập tam giác PASCAL, bằng 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 ... = ',lt(a,n)); Readln; Trang 11 End Bài. .. Write(' Nhap n = '); readln(n); For i:=0 to n do Begin For j:=0 to i do Write(C(j,i):3:0); Writeln; End; Readln; End Bài 30: Viết các chương trình

Ngày tải lên: 02/11/2015, 17:33

... Tổng Hợp 61 Bài Tập Pascal Có Lời Giải ST Bài 1: Nhập vào cạnh hình chữ nhật In hình diện tích chu vi Program HINH_CHU_NHAT; ... Write('Nhap bac cua da thuc a=... ',c(n,k):6:0); Readln; End k Bài 29: Lập tam giác PASCAL, bằng Cn (dùng chương trình con) n Program TAM_GIAC _PASCAL; Uses Crt; Var i,j,n,k:integer; Function gt(n:integer):longint; ... '); readln(a); Write('Nhap n = '); readln(n); Writeln(a,'^',n,' = ',lt(a,n)); Readln; Trang 11 End Bài 27: Tính n! (dùng chương trình con)... then kq:=kq+1; Count:=kq; Begin End; Writeln('CHUONG

Ngày tải lên: 02/06/2016, 16:52

... tich tam giac:',s:4:2); End Else Học Tập Long An – HocTapLongAn.Com Trang End Writeln(a,’, ‘, b,’, ‘, c, ‘ khong phai la ba canh cua tam giac') ; Readln; Bài 4: Viết chương trình giải phương ... Writeln('Dien tich hinh chu nhat la:’,s:6:2); Writeln('Chu vi hinh chu nhat:',c:6:2); Readln; End Bài 2: Nhập vào bán kính hình tròn In hình diện tích chu vi Program HINHTRON; Uses Crt; Var r,dt,cv:real; ... Writeln('Dien tich hinh tron la:',dt:6:2); Writeln('Chu vi hinh tron la:',cv:6:2); Readln; End Bài : Tính tam giác: Nụâp vào ba số a,b,c Kiểm tra xem độ dài ba cạnh hay không, không in hình '

Ngày tải lên: 17/07/2017, 13:26

... Bài 1: Với số thực x nhập vào từ bàn phím tính tổng sau: TONG = − x3 x6 x9 x 3n + − + + (−1) n ... ',S:0:3); WRITE('BAN CO MUON TIEP TUC KHONG? (C/K): '); READLN(CHON); UNTIL UPCASE(CHON)='K'; END Bài 2: Cho dãy số un mà phần tử xác định sau: xn un = n! un = ( x − 1) n n! Nếu n lẽ Nếu n chẵn ... ELSE BEGIN T2:=T2*((X-1)/N); S2:=S2+T2; END; INC(N); END; WRITE('S = ',S1+S2:0:3); READLN; END BÀI 3: Cho hai số tự nhiên k, n (kA[K,J] THEN BEGIN TG:=A[K,I]; A[K,I]:=A[K,J]; A[K,J]:=TG; END;

Ngày tải lên: 07/01/2020, 15:25

... khơng Bài 4: Giải phương trình bậc Bài 5: Kiểm tra số chẵn lẻ, ngun tố, hồn hảo Bài 6: Tính ăn bậc n số Bài 7: Tỉnh tổng chữ số số Bài 8: Hoán vị số Bài 9: In bội Bài 10: In tổng chữ số số Bài 11: ... số tập Pascal từ đến phức tạp mà Quantrimang.com tổng hợp lại, hy vọng việc học bạn dễ dàng đơi chút Bài tập Pascal có giải Bài 1: In số chẵn hình Bài 2: Tính, in tổng, hiệu, tích, thương số Bài ... nguyên tố Bài 12: Kiểm tra số hoàn hảo Bài 13: Kiểm tra số phương Bài 14: Đếm nguyên âm, số chuỗi Bài 15: Kiểm tra số có độ dài cạnh tam giác không Bài 16: Đếm số theo điều kiện tính tổng Bài 17:

Ngày tải lên: 04/07/2020, 20:33

... ((5*td+3*tn+tg/3=100)and (td+tn+tg=100)) then Writeln(td:6, tn:12, tg:15); Readln; End (10 )Bài 23: Tạo bảng số dạng sau: 0 10 11 12 13 14 15 16 17 18 19 Program BANG_SO; Uses crt; Var i,j,n:integer; ... ');readln(k); Writeln('C(',n,',',k,') = ',c(n,k):6:0); Readln; Bài 29: Lập tam giác PASCAL, Cnk(dùng chương trình con) n Program TAM_GIAC _PASCAL; Uses Crt; Var i,j,n,k:integer; (13)Function gt(n:integer):longint; ... Writeln('Tong la: ',s:6:2); Readln; Bài 36: Giải hệ phương trình: Viết chương trình giải hệ phương trình tuyến tính ẩn dùng ma trận a11.x + a12.y = c1 a21 + a22.y = c2 Bài 37: Hãy viết chương trình

Ngày tải lên: 09/02/2021, 13:06

... ok:=true; For i:=1 to n For j:=i+1 to n (103)(104)(105)(106)(107)(108)(109) (110 ) (111 ) (112 ) (113 ) (114 ) (115 ) (116 ) (117 ) (118 ) (119 )End; Clrscr; (120)khong doi xung'); End Writeln('KIEM TRA MA TRAN ... not eof(f) Begin End End; Readln; read(f,i); write(i:3); 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; (143)Uses Crt; ... ((5*td+3*tn+tg/3=100)and (td+tn+tg=100)) then Writeln(td:6, tn:12, tg:15); Readln; End (19)B i : Tạo bảng số dạng sau: 0 10 11 12 13 14 15 16 17 18 19 Program BANG_SO; Uses crt; Var i,j,n:integer; Begin

Ngày tải lên: 02/04/2021, 08:46

... n  9) a) Hãy liệt kê tất chỉnh hợp lặp chập n phần tử (1, 2, 3, …, n) Ví dụ với n = 4: 111 112 113 114 121 122 123 124 … Chú ý: số chỉnh hợp lặp chập k n phần tử = nk. b) Hãy liệt kê tất ... * Tập H chứa chữ hoa * Tập S chứa chữ số * Tập C chứa kí tự cịn lại c) Đưa hình số lượng phần tử liệt kê phần tử tập hợp 6.3 Tìm số ngun tố khơng vượt N (N < 255) sàng Eratosthene với tập ... kiểu liệu tập hợp số nguyên dương, với phép tính: a) Kiểm tra phần tử có thuộc tập hợp hay khơng b) Kết nạp phần tử vào tập hợp loại bỏ phần tử khỏi tập hợp c) Tìm phần hợp, giao, bù hai tập hợp

Ngày tải lên: 28/04/2021, 14:20

... Các tập Pascal bản, KINH ĐIỂN, khó, RẤT KHÓ & RẤT THÚ VỊ (Đặc biệt phần GRAPHIC phần GRAPH THEORY ) PHẦN I- CÁC BÀI TOÁN CƠ BẢN A/ LẬP TRÌNH KHƠNG DÙNG CẤU TRÚC ... Ans In ['n','N']; End 8- (BÀI TOÁN NGƯỢC CỦA BÀI 7) Lập trình cho viết số Thập Phân tương ứng số La Mã đọc từ bàn phím vào Ví dụ vào: MMXVII, ra: 2017 (BÀI NÀY KHĨ HƠN BÀI TRÊN) Program LaMa_ThapPhan; ... toán xử lý mảng 2-chiều, dùng biến đơn, lập trình in lên hình bảng ziczac chứa 100 số tự nhiên (Bạn có làm 10 phút không?) 0123456789 10 11 12 13 14 15 16 17 18 19 -90 91 92 93 94 95 96

Ngày tải lên: 20/05/2021, 02:07

... Các tập Pascal bản, KINH ĐIỂN, khó, RẤT KHÓ & RẤT THÚ VỊ (Đặc biệt phần GRAPHIC phần GRAPH THEORY ) PHẦN I- CÁC BÀI TOÁN CƠ BẢN A/ LẬP TRÌNH KHƠNG DÙNG CẤU TRÚC ... Ans In ['n','N']; End 8- (BÀI TOÁN NGƯỢC CỦA BÀI 7) Lập trình cho viết số Thập Phân tương ứng số La Mã đọc từ bàn phím vào Ví dụ vào: MMXVII, ra: 2017 (BÀI NÀY KHĨ HƠN BÀI TRÊN) Program LaMa_ThapPhan; ... toán xử lý mảng 2-chiều, dùng biến đơn, lập trình in lên hình bảng ziczac chứa 100 số tự nhiên (Bạn có làm 10 phút không?) 0123456789 10 11 12 13 14 15 16 17 18 19 -90 91 92 93 94 95 96

Ngày tải lên: 20/05/2021, 02:07