Cau lenh lap.ppt

Đối với từng đoạn chương trình Pascal sau đây, hãy cho biết lệnh writeln in ra màn hình giá trị của i, j và k là bao nhiêu? Đoạn CT 3: j:= 3 ; k:= 2 ; for i:=1 to 6 do if i mod 2 = 0 then begin j:= j + 1 ; k:= k + j ; end; write('j= ', j ,'; k= ',k); Đoạn CT 2: j:= 3 ; k:= 2 ; for i:=1 to 6 do begin j:= j + 1 ; k:= k + j ; end ; write('j= ', j ,'; k= ',k); Đoạn CT 1: j:= 3 ; k:= 2 ; for i:=1 to 6 do j:= j + 1 ; k:= k + j ; write('j= ', j ,'; k= ',k) ; i = 6 ; j = 9 ; k = 11 i = 6 ; j = 9 ; k = 41 i = 6 ; j = 6 ; k = 17 Baøi 7 Baøi 7 Các câu lệnh Pascal sau đây có hợp lệ không, vì sao? a) For i : = 100 to 1 do writeln(‘A’) ; b) For i : = 1.5 to 10.5 do writeln(‘A’) ; c) For i = 1 to 10 do writeln(‘A’) ; d) For i : = 1 to 10 do ; writeln(‘A’) ; e) Var x : real ; begin for x :=1 to 10 do writeln(‘A’) ; end. Baøi 7 Baøi 7 Trong câu lệnh lặp for i:=1 to 10 do begin … end; Câu lệnh ghép được thực hiện bao nhiêu lần? A. Không lần nào B. 1 lần C. 2 lần D. 10 lần Baøi 7 Baøi 7 Sau khi thực hiện đoạn CT Pasacl sau: For i:=0 to 10 do Begin …………… End; Giá trị của i là bao nhiêu? A. 0 B. 10 C. 11 D. Không xác định Giá trị biến đếm của vòng lặp sau khi thoát khỏi vòng lặp là tùy thuộc vào mỗi chương trình dịch. Người lập trình có thể sử dụng lại biến này bằng cách khởi tạo lại giá trị cho nó nhưng không nên sử dụng giá trị của nó ngay sau vòng lặp. Baøi 7 Baøi 7 Sau khi thực hiện đoạn CT Pascal: x:=1; For i:=1 to m do Begin y:= x ; x:= y – 1 ; End; Chúng ta sẽ nhận được kết quả nào dưới đây? A. x = x – m ; B. x = i – x ; C. x:= x – i ; D. i = 0 và x = y – 1 ; Baøi 7 Baøi 7 Trong lệnh lặp for … to … do của Pascal, trong mỗi vòng lặp, biến đếm thay đổi như thế nào? A. +1 B. +1 hoặc -1 C. Một giá trị bất kì D. Một giá trị khác 0. Bổ sung kiến thức: Ta đã biết sau mỗi vòng lặp của lệnh lặp for … to … do biến đếm được tăng lên 1. Ngoài lệnh trên, Pascal còn có câu lệnh lặp dạng: For <biến đếm>:= <giá trị cuối> downto <giá trị đầu> do <câu lệnh> ; Trong đó, sau mỗi vòng lặp biến đếm lại giảm đi 1. Baøi 7 Baøi 7 Hãy mô tả thuật toán để tính tổng sau đây: 1 1 1 1 A 1.3 2.4 3.5 ( 2)n n = + + + + + Thuật toán: Bước 1: A ← 0, i ← 1 . Bước 2: A ← Bước 3: i ← i + 1. Bước 4: Nếu i ≤ n, quay lại bước 2. Bước 5: Ghi kết quả A và kết thúc thuật toán. 1 ( 2)i i + Em hãy viết chương trình tính tổng các số nguyên liên tiếp từ n đến m với n, m là các số nguyên dương nhập vào từ bàn phím . Gợi ý : - Tìm input,output ? - Khai báo các biến nào? Kiểu dữ liệu gì? - Nhập vào từ bàn phím giá trị cho biến nào? - Tìm thuật toán của chương trình? - Sử dụng các câu lệnh gì để viết chương trình? Baøi 7 Baøi 7 Hướng dẫn: - Input: n, m ; Output : Tổng S - Khai báo biến : n, m, S, i kiểu Word - Nhập giá trị vào từ bàn phím cho biến n và m - Thuật toán : Cho biến đếm i chạy từ n đến m ,n: Nếu I <= m thì tổng S:= S + i - Sử dụng câu lệnh Write, Readln, For to do Trả lời: Program tinh_tong; Uses crt; Var m, n, i: integer; S: longint; Begin write (‘Nhap n = ‘); readln(n); write (‘Nhap m = ‘); readln(m); S:=0; For i:= n to m do S:= S + i; Writeln (‘Tong cua S = ’,s); Readln End. Baøi 7 Baøi 7 1. Viết chương trình tính tổng các số chẵn, lẻ từ 1 đến n với n nhập từ bàn phím. 2. Viết chương trình để tìm tất cả các số Py-ta-go trong khoảng (1 ; 32000). 3. BT 7.6 , 7.11 , 7.12 , 7.13 SBT tr. 60-62. Baøi 7 Baøi 7