Bài 10. Cấu trúc lặp

Đăng nhập

Tin tức cộng đồng

Tin tức thư viện

Chức năng Dừng xem quảng cáo trên violet.vn

Kính chào các thầy, cô! Hiện tại, kinh phí duy trì hệ thống dựa chủ yếu vào việc đặt quảng cáo trên hệ thống. Tuy nhiên, đôi khi có gây một số trở ngại đối với thầy, cô khi truy cập. Vì vậy, để thuận tiện trong việc sử dụng thư viện hệ thống đã cung cấp chức năng...

Khắc phục hiện tượng không xuất hiện menu Bộ công cụ Violet trên PowerPoint và Word

Thử nghiệm Hệ thống Kiểm tra Trực tuyến ViOLET Giai đoạn 1

Xem tiếp

Hướng dẫn sử dụng thư viện

Đưa bài giảng lên

Gốc > THPT (Chương trình cũ) > Tin học > Tin học 11 >

0 / 0

Tham khảo cùng nội dung: Bài giảng, Giáo án, E-learning, Bài mẫu, Sách giáo khoa, ...

Nhấn vào đây để tải về
Báo tài liệu có sai sót
Nhắn tin cho tác giả

(Tài liệu chưa được thẩm định)
Nguồn:
Người gửi: Đỗ Cường
Ngày gửi: 17h:43' 13-01-2009
Dung lượng: 233.5 KB
Số lượt tải: 16

Số lượt thích: 0 người

Bài 10
(tiếp 2)
FOR := TO DO < câu lệnh>;
b. Dạng lặp lùi:

FOR := DOWNTO DO ;

? Giá trị đầu, giá trị cuối là các biểu thức cùng kiểu với biến đếm, giá trị đầu phải nhỏ hơn giá trị cuối.

Trong đó:
? Biến đếm là biến kiểu số nguyên hoặc kí tự.

? Giá trị biến đếm được điều chỉnh tự động, vì vậy câu lệnh sau DO không được thay đổi giá trị biến đếm.

Nêu cấu trúc lặp dạng tiến và dạng lùi?
a. Dạng lặp tiến:

II. LẶP VỚI SỐ LẦN LẶP BIẾT TRƯỚC
II. LẶP VỚI SỐ LẦN LẶP BIẾT TRƯỚC
Ví dụ 1: Tính và đưa kết quả ra màn hình tổng sau:

* Dữ liệu vào (Input):Nhập a

* Dữ liệu ra (Output): Tổng S

program tinh_tong;
uses crt;
var s: real;
a,N:integer;
begin
clrscr;
write(`Hay nhap gia tri a vao : `);
readln(a);
s:=1.0/a;
for N:=1 to 100 do
s:=s+1.0/(a+N);
writeln(`Tong s= `,s:10:4);
readln;
end.

II. LẶP VỚI SỐ LẦN LẶP BIẾT TRƯỚC
program tinh_tong;
uses crt;
var s: real;
a,N:integer;
begin
clrscr;
write(`Hay nhap gia tri a vao : `);
readln(a);
s:=1.0/a;
for N:=1 to 100 do
s:=s+1.0/(a+N);
writeln(`Tong s= `,s:10:4);
readln;
end.

for N:=100 downto 1 do
II. LẶP VỚI SỐ LẦN LẶP BIẾT TRƯỚC
Ví dụ 2: Chương trình sau thực hiện việc nhập từ bàn phím hai số nguyên dương M và N (M
* Dữ liệu vào (Input): Nhập M
Nhập N
* Dữ liệu ra (Output): Tổng các số trong phạm vi từ M?N chia hết cho 3 hoặc 5
program vi_du_2;
uses crt;
var m,n,i:integer;
t:longint;
begin
clrscr;
write(`nhap so m write(`m `);readln(m)
write(`n `);readln(n)
t:=0;
for i:=m to n do
if (i mod 3=0) or (i mod 5=0) then t:=t+i;
writeln(`ket qua: `,t );
readln;
end.
for i:=m downto n do
II. LẶP VỚI SỐ LẦN LẶP BIẾT TRƯỚC
Ví dụ 3: Chương trình sau thực hiện việc nhập từ bàn phím hai số nguyên dương M và N (M
Dữ liệu vào (Input) :
Nhập M, N
Dữ liệu ra (Output): Các số chẵn
program vi_du_4;
uses crt;
var m,n,i:integer;
begin
clrscr;
write(`nhap so m write(`m `);readln(m)
write(`n `);readln(n)
for i:=m to n do
if (i mod 2=0) then
writeln(`ket qua: `,i );
readln;
end.
for i:=m downto n do
II. LẶP VỚI SỐ LẦN LẶP BIẾT TRƯỚC
Ví dụ 4: Lập chương trình tính tổng sau:

- Dữ liệu vào (Input) : Nhập N
- Dữ liệu ra (Output) : Tổng S
- Giá trị khởi đầu: S=1
- Gọi i là biến đếm đi từ 2 đến N