Đề cương ôn tập môn Tin học 8

Sau đó giá trị biến đếm tăng dần một đơn vị từ giá trị đầu đến giá trị cuối và câu lệnh được thực hiện mỗi lần tăng biến đếm cho đến khi biến đếm vượt quá giá trị cuối thì kết thúc... [r]

ĐỀ CƯƠNG ÔN TẬP TIN 8

I Câu hỏi :

1

Nêu cú pháp và cách hoạt động của câu lệnh lặp?

2

Cho 1 ví dụ về câu lệnh lặp ?

3

Viết chương trình tính tổng của N số tự nhiên đầu tiên, với N là số tự nhiên

được nhập vào từ bàn phím ?

4

Viết chương trình tính tổng sau:

S= 1

12+

1

22+ .+

1

n2 (n nhập vào từ bàn phím)

5

Viết chương trình tính:

a S1 = 2n

b S2= n!=1.2.3…n

6

HS tự ôn tập và thực hành thêm tại nhà

II Gợi ý trả lời :

1

- Cú pháp:

for <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

Trong đó, for, to, do là các từ khoá, biến đếm là biến kiểu nguyên, giá trị đầu, giá trị cuối là các giá trị nguyên

- Cách hoạt động: Khi gặp câu lệnh lặp trên, câu lệnh được thực hiện bắt đầu với giá trị biến đếm bằng giá trị đầu Sau đó giá trị biến đếm tăng dần một đơn vị từ giá trị đầu đến giá trị cuối và câu lệnh được thực hiện mỗi lần tăng biến đếm cho đến khi biến đếm vượt quá giá trị cuối thì kết thúc Như vậy biến đếm phải được khai báo là kiểu nguyên và giá trị cuối phải không nhỏ hơn giá trị đầu.

2

program Lap;

var i: Integer;

begin

for i := 1 to 10 do

writeln('Day la lan lap thu ',i);

ReadLn;

end

3

program Tinh_tong;

var N,i: Integer;

S: longint;

begin

write('Nhap so N = '); readln(N);

S:=0;

for i := 1 to N do S:=S+i;

writeln('Tong cua ',N,' so tu nhien dau tien S = ',S);

end

4

Uses crt;

Var S:Real; i, n: Integer;

Begin

Write(‘Nhap n=’); ReadLn(n);

S:=0;

For i:=1 To n Do S:=S+1/i*i;

Write(S);

ReadLn;

End

5

Uses crt;

Var S1, S2:Real; i, n: Integer;

Begin

Write(‘Nhap n=’); ReadLn(n);

S1:=1; S2:=1;

For i:=1 To n Do

Begin

S1:=S1*2;

S2:=S2*i;

End;

WriteLn(S1); WriteLn(S2);

ReadLn;

End

6 HS tự ôn tập và thực hành thêm tại nhà