bài tập pascal chương 2 mới nhất

GIAO TRINH LY THUYET VA BAI TAP TURBO PASCAL-CHUONG 1 Dang Thanh Tuan(15/3/2004) **********0101********** Program PTB2; Var a,b,c:Integer; delta,x1,x2:Real; Begin Writeln('GIAI PHUONG TRINH BAC HAI'); Writeln(' --------------'); Repeat Write('-Nhap he so a= '); Readln(a); Until a <>0; Write('-Nhap he so b= '); Readln(b); Write('-Nhap he so c= '); Readln(c); delta:=b*b-4*a*c; If delta < 0 Then Writeln('*Phuong trinh vo nghiem') Else If delta = 0 Then Writeln('*Phuong trinh co 2 nghiem bang nhau X= ',-b/2*a:6:2) Else Begin x1:=(-b-sqrt(delta))/2*a; x2:=(-b+sqrt(delta))/2*a; Writeln('*Nghiem thu nhat X1= ',x1:6:2); Writeln('*Nghiem thu hai X2= ',x2:6:2); End; readln End. **********0102********** Program Ao_thu; Begin Writeln(' BAI THO AO THU'); Writeln('Ao thu lanh leo nuoc trong veo'); Writeln('Mot chiec thuyen cau be teo teo'); Writeln('Song biec theo lan hoi gon ty'); Writeln('La vang truoc gio se dua veo'); Writeln(' NGUYEN KHUYEN'); Readln End. **********0103********** Program So_hoc; Var so1,so2,tong,hieu,tich:Integer; thuong:Real; Begin Write('-Nhap so thu nhat = '); Readln(so1); Write('-Nhap so thu hai = '); Readln(so2); tong := so1 + so2; hieu := so1 - so2; tich := so1 * so2; thuong := so1 / so2; Writeln('*Tong cua hai so ',so1,' va ',so2,' = ',tong); Writeln('*Hieu cua hai so ',so1,' va ',so2,' = ',hieu); Writeln('*Tich cua hai so ',so1,' va ',so2,' = ',tich); Writeln('*Thuong cua hai so ',so1,' va ',so2,' = ',thuong:6:2); Readln End. **********0104********** Program Pithagore; Var a,b :Integer; c:Real; Begin Writeln(' CHUONG TRINH TINH CANH HUYEN TAM GIAC VUONG'); Writeln(' theo dinh ly Pithagore'); Write('-Nhap canh a = '); Readln(a); Write('-Nhap canh b = '); Readln(b); c := Sqrt((a*a) + (b*b)); Writeln('*Canh huyen = ',c:6:2); Readln End. **********0105********** Program Phep_Cong; Var so1,so2,so3,tong :Integer; Begin Writeln(' CHUONG TRINH THUC HIEN PHEP CONG SO HOC'); Writeln(' co toi da 4 ky so'); Write('-Nhap so thu nhat = '); Readln(so1); Write('-Nhap so thu hai = '); Readln(so2); Write('-Nhap so thu ba = '); Readln(so3); tong:= so1+so2+so3; Writeln; Writeln; Writeln('-------------------------------'); Writeln; Writeln(' ',so1:4); Writeln(' + ',so2:4); Writeln(' ',so3:4); Writeln(' -----'); Writeln(' = ',tong:5); Readln End. **********0106********** Program Lenh_Write; Begin Write('Nam '); Write('Quoc '); Write('Son '); Write('Ha '); Write('Nam '); Write('De '); Write('Cu '); Readln End. **********0107 Program Lenh_Writeln; Begin Writeln('Nam '); Writeln('Quoc '); Writeln('Son '); Writeln('Ha '); Writeln('Nam '); Writeln('De '); Writeln('Cu '); Readln End. *********0108********* Program Tam_giac_Pascal; Begin Writeln(' 1'); Writeln(' 1 BÀI TẬP PASCAL Câu 1: Lập chương trình tính tổng số thực a, b, c nhập từ bàn phím Kết in hình đến chữ số thập phân? -Câu 2: Lập chương trình tính tích số nguyên dương M, N, K nhập từ bàn phím Kết in hình có độ rộng ? -Câu 3: Lập chương trình tính diện tích hình thang với đáy lớn, đáy bé, chiềucao a, b, h nhập từ bàn phím Kết diện tích in hình đến chữ số thập phân? Câu 4: Lập chương trình tính diện tích va chu vi hình tam giác với cạnh a, b, c nhập từ bàn phím Kết in hình đến chữ số thập phân? Gợi ý : chuvi= a+b+c; p= (a+b+c)/ ; s=sqrt(p*(p-a)*(p-b)*(p-c)) Câu 5: Lập chương trinh tính biểu thức U=X3+2XY + Với X,Y nhập từ bàn phím Kết in hình đến chữ số thập phân - Bài tập luyện thi chơng 2 2.4 Phát biểu nào sau đây về đại lợng đặc trng của sóng cơ học là không đúng? A. Chu kỳ của sóng chính bằng chu kỳ dao động của các phần tử dao động. B. Tần số của sóng chính bằng tần số dao động của các phần tử dao động. C. Vận tốc của sóng chính bằng vận tốc dao động của các phần tử dao động. D. Bớc sóng là quãng đờng sóng truyền đi đợc trong một chu kỳ. 2.5 Sóng cơ học lan truyền trong môi trờng đàn hồi với vận tốc v không đổi, khi tăng tần số sóng lên 2 lần thì bớc sóng A. tăng 4 lần. B. tăng 2 lần. C. không đổi. D. giảm 2 lần. 2.6 Vận tốc truyền sóng phụ thuộc vào A. năng lợng sóng. B. tần số dao động. C. môi trờng truyền sóng. D. bớc sóng 2.7 Một ngời quan sát một chiếc phao trên mặt biển thấy nó nhô lên cao 10 lần trong 18s, khoảng cách giữa hai ngọn sóng kề nhau là 2m. Vận tốc truyền sóng trên mặt biển là A. v = 1m/s. B. v = 2m/s. C. v = 4m/s. D. v = 8m/s. 2.8 Một ngời quan sát một chiếc phao trên mặt hồ thấy nó nhô lên cao 10 lần trong 36s, khoảng cách giữa 3 đỉnh sóng lân cận là 24m. Vận tốc truyền sóng trên mặt hồ là A. v = 2,0m/s. B. v = 2,2m/s. C. v = 3,0m/s. D. v = 6,7m/s. 2.9 Tại điểm M cách tâm sóng một khoảng x có phơng trình dao động cm x tu M ) 2 200sin(4 = . Tần số của sóng là A. f = 200Hz. B. f = 100Hz. C. f = 100s. D. f = 0,01s. 2.10 Cho một sóng ngang có phơng trình sóng là mm xt u ) 501,0 (2sin8 = , trong đó x tính bằng cm, t tính bằng giây. Chu kỳ của sóng là A. T = 0,1s. B. T = 50s. C. T = 8s. D. T = 1s. 2.11 Cho một sóng ngang có phơng trình sóng là mm xt u ) 501,0 (2sin8 = , trong đó x tính bằng cm, t tính bằng giây. Bớc sóng là A. = 0,1m. B. = 50cm. C. = 8mm. D. = 1m. 2.12 Cho một sóng ngang có phơng trình sóng là mm x tu ) 5 (2sin4 += , trong đó x tính bằng cm, t tính bằng giây. Vận tốc truyền sóng là A. v = 5m/s. B. v = - 5m/s. C. v = 5cm/s. D. v = - 5cm/s. 2.13 Một sóng truyền trên sợi dây đàn hồi rất dài với tần số 500Hz, ngời ta thấy khoảng cách giữa hai điểm gần nhau nhất dao động cùng pha là 80cm. Vận tốc truyền sóng trên dây là A. v = 400cm/s. B. v = 16m/s. C. v = 6,25m/s. D. v = 400m/s. 2.14 Cho một sóng ngang có phơng trình sóng là mm xt u ) 21,0 (sin5 = ,trong đó x tính bằng cm, t tính bằng giây. Vị trí của phần tử sóng M cách gốc toạ độ 3m ở thời điểm t = 2s là A. u M =0mm. B. u M =5mm. C. u M =5cm. D. u M =2,5cm. 2.15 Một sóng cơ học lan truyền với vận tốc 320m/s, bớc sóng 3,2m. Chu kỳ của sóng đó là A. T = 0,01s. B. T = 0,1s. C. T = 50s. D. T = 100s. Chủ đề 2: Sóng âm. 2.16 Vận tốc truyền âm trong không khí là 340m/s, khoảng cách giữa hai điểm gần nhau nhất trên cùng một phơng truyền sóng dao động ngợc pha nhau là 0,85m. Tần số của âm là A. f = 85Hz. B. f = 170Hz. C. f = 200Hz. D. f = 255Hz. 2.17 Một sóng cơ học có tần số f = 1000Hz lan truyền trong không khí. Sóng đó đợc gọi là A. sóng siêu âm. B. sóng âm. C. sóng hạ âm. D. cha đủ điều kiện để kết luận. 2.18 Sóng cơ học lan truyền trong không khí với cờng độ đủ lớn, tai ta có thể cảm thụ đợc sóng cơ học nào sau đây? A. Sóng cơ học có tần số 10Hz. B. Sóng cơ học có tần số 30kHz. C. Sóng cơ học có chu kỳ 2,0 s. D. Sóng cơ học có chu kỳ 2,0ms. 2.19 Phát biểu nào sau đây là không đúng? A. Sóng âm là sóng cơ học có tần số nằm trong khoảng từ 16Hz đến 20kHz. B. Sóng hạ âm là sóng cơ học có tần số nhỏ hơn 16Hz. C. Sóng siêu âm là sóng cơ học có tần số lớn hơn 20kHz.D. Sóng âm thanh bao gồm cả sóng âm, hạ âm và siêu âm. 2.20 Vận tốc âm trong môi trờng nào sau đây là lớn nhất? A. Môi trờng không khí loãng. B. Môi trờng không khí. C. Môi trờng nớc nguyên chất. D. Môi trờng chất rắn. 2.21 Một sóng âm 450Hz lan truyền với vận tốc 360m/s trong không khí. Độ lệch pha giữa hai điểm cách nhau 1m trên một phơng truyền sóng là A. = 0,5(rad). B. = 1,5(rad). C. = 2,5(rad). D. = 3,5(rad). 2.22 Phát biểu nào sau đây là không đúng? A. Nhạc âm là do nhiều nhạc cụ phát ra. B. Tạp âm là các âm có tần số không xác định. C. Độ cao của âm là một đặc tính của âm. truy cập không đúng hoặc trang web riêng uploads đã bị xóa Trở về http://violet.vn CHƯƠNG 2: CHƯƠNG TRÌNH ĐƠN GIẢN. Bài 1: Viết chương trình tính Z=5x 4 + 3y. In kết quả ra màn hình. Program bai1; Var Z,x,y:integer; Begin Write(‘nhap x,y’); readln(x,y); Z:=5*sqr(x)*sqr(x) + 3*y; {Z:=5*x*x*x*x + 3*y;} Writeln(Z); Readln End. Bài 2: Viết chương trình tính . 2 2 M a b= + . In kết quả ra màn hình. Program bai2; Var a,b:integer; M: real; Begin Write(‘Nhap a,b’); readln(a,b); M:=sqrt(sqr(a) + sqr(b)); Writeln(M:2:4); Readln End. Bài 3: viết chương trình in ra màn hình tam giác sau: * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Bài 4: Viết chương trình tính diện tích hình thang. In kết quả ra màn hình. Program Hinh_thang; Var a,b,h:Integer; S:Real; Begin Writeln('CHUONG TRINH TINH DIEN TICH HINH THANG'); Write('-Cho biet day ngan = '); Readln(a); Write('-Cho biet day dai = '); Readln(b); Write('-Cho biet chieu cao = '); Readln(h); S := 0.5 * (a + b) * h; Writeln('+Dien tich hinh thang = ',s:6:2,' met vuong'); Readln End. Bài 5: Viết chương tính diện tích tam giác. In kết quả ra màn hình. Program Tam_Giac; Var a,b,c:Integer; p,s:Real; Begin Writeln('CHUONG TRINH TINH DIEN TICH TAM GIAC'); Write('-Cho biet canh thu nhat = '); Readln(a); Write('-Cho biet canh thu hai = '); Readln(b); Write('-Cho biet canh thu ba = '); Readln(c); p := 0.5 * (a + b + c); s := sqrt(p*(p-a)*(p-c)*(p-c)); Writeln('+Dien tich hinh tam giac = ',s:6:2,' met vuong'); Readln End. BÀI TẬP TỰ LÀM Bài 1: Viết chương trình tính diện tích hình cầu. In kết quả ra màn hình. Bài 2: Viết chương trình tính diện tích hình chữ nhật. In kết quả ra màn hình Bài 3: Viết chương trình tính chu vi, diện tích hình tròn. In kết quả ra màn hình. ********************************************************************** CHƯƠNG 3: CẤU TRÚC RẼ NHÁNH VÀ LẶP Bài 1: Viết chương trình nhập từ bàn phím số nguyên dương N. Kiểm tra xem N có chia hết cho 3 và 5 hay không. In kết ra màn hình. Program bai1; var N:integer; begin write('nhap N='); readln(n); if (n mod 3=0) and (n mod 5=0) then writeln(n,'chia het cho 3 va 5') else writeln(n,'khong chia het cho 3 va 5'); readln end. Bài 2: Viết chương trình in ra màn hình từ 1 10. program bai2; var i:integer; begin for i:=1 to 10 do write(i:4); readln end. Bài 3: Viết chương trình in ra màn hình từ 10 1. Bài 4: Viết chương trình tính tổng S=1 +2 +3 + …+ N. In kết quả ra màn hình. var s,n,i:integer; begin write('nhap n'); readln(n); s:=0; for i:= 1 to n do s:=s+i; writeln(s); readln end. Bài 5: Lập trình tính giá trị biểu thức S=1 2 +2 2 +…+ N 2 . In kết quả ra màn hình. program bai4; var s,n,i:integer; begin write('nhap n'); readln(n); s:=0; for i:= 1 to n do s:=s+sqr(i); writeln(s); readln end. BÀI TẬP TỰ LÀM Bài 1: Lập trình tìm tất cả các số hoàn hảo nhỏ hơn số n cho trước với n được nhập từ bàn phím, trong đó số hoàn hảo là bằng tổng các ước số của nó không kể chính nó, ví dụ: 6 là một số hòan hảo vi 6=1 + 2+3. Bài 2. Viết chương trình tính tổng bậc 3 của N số nguyên đầu tiên. In kết quả ra màn hình. Bài 3: Viết chương trình tìm ước số của số nguyên N. In kết quả ra màn hình. Bài 4: Viết chương trình tính tổng nghịch đảo N số nguyên đầu tiên. In kết quả ra màn hình. Bài 5:Viết chương trình tính tổng bình phương các số lẻ từ 1 N. In kết quả ra màn hình. Bài 6: Viết chương trình tính N!. In kết quả ra màn hình. Bài 7: Viết chương trình tính a n . In kết quả ra màn hình. Bài 8: Viết chương trình giải Thứ ngày tháng năm Đề ôn hè lớp lên lớp Môn: Toán - Thời gian 40 phút (Không kể thời gian phát đề) Họ Tên:……………………………………Lớp ……………………… Điểm Lời phê thầy, cô giáo Chữ kí gia đình Phần 1: Trắc nghiệm (4 điểm) Khoanh tròn vào chữ đặt trước đáp án Câu 1: (1 điểm) Trong số sau: 345, 235, 354, 253 Số lớn A 354 B 253 C 345 D 235 Câu 2: (1 điểm) Dãy tính x – có kết là: A 22 B 20 C.12 D.1 Câu 3: (1 điểm) Thứ năm tuần ngày 10 tháng Hỏi thứ năm tuần sau ngày tháng 5? A B 17 C Câu 4: (0.5 điểm) Khoanh vào chữ đặt trước câu trả lời đúng: A hình tam giác hình tứ giác B hình tam giác hình tứ giác C hình tam giác hình tứ giác Câu 5: (0.5 điểm) Tìm X X : = 10 A X = B X = C X = 20 II Phần tự luận (6 điểm) Câu 1: Đặt tính tính (2 điểm) 342 + 254 789 - 436 68 + 17 92 - 46 Câu 2: Tính (1 điểm) x - 12 = 36 : + 81 = Câu 3: (1 điểm) Mỗi bạn cắt Hỏi bạn cắt tất sao? Bài giải Câu 4: (1 điểm) Cho hình tứ giác ABCD hình vẽ: A 3cm B 2cm 4cm D 6cm C Tính chu vi hình tứ giác ABCD Bài giải Câu 5: (1 điểm) Điền số thiếu vào chỗ chấm a) 211, 212, , , , 216 b) 420, 430, , , , 470 Thứ ngày tháng năm Đề ôn hè lớp lên lớp Môn: Toán - Thời gian 40 phút (Không kể thời gian phát đề) Họ Tên:……………………………………Lớp ……………………… Điểm Lời phê thầy, cô giáo Chữ kí gia đình Bài 1: Đặt tính tính (2 điểm) a/ 257 + 312 b/ 629 + 40 c/ 318 – 106 d/ 795 - 581 Bài 2: Số (1 điểm) Đọc số Một trăm linh chín Viết số 321 906 Hai trăm hai mươi hai Sáu trăm bốn mươi Bài 3: Tính (2 điểm) a/ x + 41 = c/ x – 16 = = = b/ 45 : – = d/ 16 : + 37 = = = Bài 4: Giải toán (2 điểm) Nhà bác Hùng thu hoạch 259 kg mận Nhà bác Thoại thu hoạch nhiều nhà bác Hùng 140 kg Hỏi nhà bác Thoại thu hoạch ki-lô-gam mận? Bài giải: Bài 5: Tìm x (1 điểm) a/ X : = x X = 24 x = …………… x = ……………… x = …………… x = ……………… Bài 6: Khoanh tròn vào chữ đặt trước đáp án (2 điểm) a/ Tam giác ABC có cạnh 120 mm, 300 mm 240 mm Chu vi tam giác ABC là: A 606 mm B 660 mm C 660 cm D 606 cm b/ Lúc đúng: A B C D Kim ngắn số 8, kim dài số Kim ngắn số 12, kim dài số Kim ngắn số 8, kim dài số 12 Kim ngắn số 8, kim dài số c/ Các số 456; 623 142 viết theo thứ tự từ bé đến lớn là: A 456; 623; 142 B 623; 456; 142 C 142; 623; 456 D 142; 456; 623 d/ x : = ; x là: A x = B x = Thứ ngày tháng năm C x = D x = Đề ôn hè lớp lên lớp Môn: Toán - Thời gian 40 phút (Không kể thời gian phát đề) Họ Tên:……………………………………Lớp ……………………… Điểm Lời phê thầy, cô giáo Chữ kí gia đình I TRẮC NGHIỆM :… (3 điểm ) Khoanh tròn kết 1/ Tính : 32 : = ? a b c.9 d 10 2/ Tìm x biết: x X = 36 a x = b x = c x = 3/Viết “giờ” “phút” vào chỗ chấm thích hợp: d.x = a Mỗi trận thi đấu bóng đá kéo dài 90 b Buổi sáng, em thức dậy lúc 4/ Khoanh vào chữ đặt hình tô màu A B C 5/ Độ dài đường gấp khúc ABCD là: B 4cm 3cm A 10cm 7cm C A B 16cm C 17 D D 14 cm 6/ Có 25 kg gạo chia vào túi Hỏi túi có kg gạo? a 5kg b kg II TỰ LUẬN : … (7điểm ) c.4 kg d kg Tính nhẩm : (1 đ) x = … 27 : = …… x = … 28 : = …… Tìm X : (1 đ) a/ X x = 35 Tính (1 đ) a) × + 25 =…………………… ……………………… b/ X : = x b) × + 16 =…………………… ………………………… 4.Hình vẽ bên có : (1 đ) a/ …….hình tam giác b/ …….hình tứ giác Có 30 hoa cắm vào bình, bình có hoa Hỏi cắm tất bình? (1 điểm) Bài giải Cho tứ giác ABCD ( hình vẽ) (2 đ) a Tính chu vi hình tứ giác ABCD b Kẻ thêm đoạn thẳng để hình tam giác hình tứ giác (kẻ trực tiếp vào hình) Bài giải Thứ ngày tháng năm Đề ôn hè lớp lên lớp Môn: Toán - Thời gian 40 phút (Không kể thời gian phát đề) Họ Tên:……………………………………Lớp ……………………… Điểm 16 : 4x2 2:3 x2 Lời phê thầy, cô giáo Chữ kí gia đình Bài 1(1 điểm): Khoanh ... Câu 5: Lập chương trinh tính biểu thức U=X3+2XY + Với X,Y nhập từ bàn phím Kết in hình đến chữ số thập phân ...Câu 4: Lập chương trình tính diện tích va chu vi hình tam giác với cạnh a, b, c nhập từ bàn phím Kết in hình