Nhập vào một dãy số nguyên vào từ bàn phím cho đến khi gặp số 0 rồi tính tổng của các số dươngvà trung bình céng cña c¸c sè ©m... Liệt kê và đếm các số nguyên tố từ 2 đến N.[r]
(1)Bµi 11 Gi¸o ¸n ®iÖn tö tin häc líp 11 Lop11.com (2) Bµi tËp c©u lÖnh rÏ nh¸nh a D¹ng thiÕu: b Dạng đủ: IF <§iÒu kiÖn> THEN <C©u lÖnh>; IF <§iÒu kiÖn> THEN <C©u lÖnh1> ELSE <C©u lÖnh2>; Trong TP cho phÐp gép nhiÒu c©u lÖnh thµnh mét c©u lÖnh gäi lµ c©u lÖnh ghÐp, cã d¹ng: BEGIN < C¸c c©u lÖnh>; END; Lop11.com (3) Bµi <tr.51>: TÝnh H·y x¸c c¸c X¸c định định biÓuInput thøc vµ Output ®iÒu kiÖn cña cña bµi bµi to¸n? to¸n! Input: NhËp x, y tõ bµn phÝm Output: TÝnh z NÕu x2 + y2 ≤ NÕu x2 + y2 > vµ y ≥ x NÕu x2 + y2 > vµ y < x Th× z = x2 + y2 Th× z = x + y Th× z = 0.5 Lop11.com (4) Program vd1; Uses crt; Var z,x,y: Real; Em h·y khai b¸o biÕn cña bµi to¸n? BEGIN Clrscr; write(‘ Nhap vao x vµ y : ’); ViÕt c©u lÖnh nhËp vµo x, y? NÕu NÕu xx22++yy22≤>11 readln(x,y); vµ y ≥ <x if (sqr(x)+sqr(y)<=1) then z := sqr(x)+sqr(y); if (sqr(x)+sqr(y)>1) and (y>=x) then z := x+y; + y2 Th× Th× Z Z = = x x 0.5 if (sqr(x)+sqr(y)>1) and (y<x) then z := 0.5; Writeln(‘ Z = ‘, z:5:1); In kÕt qu¶? Readln; END Lop11.com (5) Mét sè bµi tËp vÒ lÖnh rÏ nh¸nh Giải bất phươngtrình bậc ax + b>0 §äc tõ bµn phÝm mét sè nguyªn n (1≤ n ≤ 5) ChØ c¸ch viÕt tiếng Anh số đó (Chẳng hạn, gõ n=2 thì đưa = two) §äc vµo c¸c hÖ sè a, b, c, d, e, f vµo tõ bµn phÝm, gi¶i vµ biÖn luận hệ phươngtrình sau: Đọc vào toạ độ ba điểm A(x1,y1), B(x2,y2), C(x3,y3) Viết chươngtrình kiểm tra xem ba điểm đó có tạo thành ba đỉnh tam giác không? Nếu đúng thì là tam giác gì? Diện tích b»ng bao nhiªu? NhËp vµo tõ bµn phÝm bèn sè thùc §ara mµn h×nh sè lín nhÊt, sè nhá nhÊt Lop11.com (6) Bµi tËp c©u lÖnh lÆp a Lặp với số lần lặp biết trước FOR <biến đếm> := <giá trị đầu> TO <giá trị cuối> DO < câu lệnh>; FOR <biến đếm> := <giá trị cuối> DOWNTO <giá trị đầu> DO <câu lệnh >; b Lặp với số lần lặp không biết trước WHILE <§iÒu kiÖn> DO <C©u lÖnh>; Lop11.com (7) Bµi 1: Lập chươngtrình nhập vào số n tính D÷ liÖu vµo (Input) : NhËp N D÷ liÖu (Output) : Tæng S Lop11.com (8) Các bướcviết chươngtrình: B1: NhËp n; B2: S:=0; i:=1; B3: NÕu i>N th× ®a gi¸ trÞ S => KÕt thóc B4: S:= S +i/(i+1); B5: i:=i+1 =>quay lại bước3; Program Bai1; Uses crt; Var i,n:integer; S:real; Begin Write(‘Nhap n:’); Readln(n); S:=0; For i:=1 to n S:=S+i/(i+1); Writeln(‘Tong S :’,S:7:2); Readln; END Lop11.com (9) Bµi 2: Em h·y hoµn thiện chương trình sau để tÝnh tæng S Program …; Var … Begin Nhap n; S:=?; FOR …… TO … DO S:=S + …; In S Readln; End Lop11.com (10) Bài 3: Lập chươngtrình tính tổng S S>=300, cho biết lúc đó n = ? Các bước : câu lệnh chươngtrình S:=0; N:= 0; B1: G¸n S:=0; N:=0 B2: Chõng nµo S<300 th× thùc hiÖn: N:=N+1; S:= S+ N*N; B3: In kÕt qu¶ N WHILE S<300 DO Begin N:=N+1; S:=S + N*N; End; Writeln(‘ N = ’,N); Lop11.com (11) §äc tõ bµn phÝm sè tù nhiªn N XÕp c¸c dÊu * thµnh tam gi¸c c©n N dßng Nhập vào dãy số nguyên vào từ bàn phím gặp số tính tổng các số dươngvà trung bình céng cña c¸c sè ©m T×m sè nguyªn lín nhÊt tho¶ m·n ®iÒu kiÖn: (BiÕt r»ng chóng lu«n tån t¹i h÷u h¹n) Lop11.com (12) Liệt kê và đếm các số nguyên tố từ đến N Ngườita thả hòn bi lăn trên mặt phẳng nghiêng (không có vận tốc ban đầu) Sau T giây ngườita đo đư îc qu·ng ® êng mµ bi l¨n ® îc lµ cm Nhập T và S từ bàn phím, sau đó đưara màn hình bảng gi¸ trÞ c¸c qu·ng ® êng mµ bi l¨n ® îc sau gi©y, 10 gi©y ,… phút Chạy thử với T=4 và S=80 Gi¶i bµi to¸n cæ: “Tr¨m tr©u, tr¨m cá…” Tìm số trâu đứng, trâu nằm, trâu già? Tìm năm sinh nhà thơ Nguyễn Du, biết đến n¨m 1786 tuæi cña «ng b»ng tæng c¸c ch÷ sè n¨m «ng sinh Lop11.com (13)