Trong Bài 7: Câu lệnh lặp chúng ta đã làm quen với các hoạt động lặp và cách chỉ thị cho máy tính thực hiện các hoạt động lặp với số lần đã được xác định trước. Trong thực tế có nhiều hoạt động được thực hiện lặp đi lặp lại với số lần lần chưa được biết trước. Vậy để hiểu rõ hơn về vấn đề này, mời các em cùng theo dõi Bài 8: Lặp với số lần chưa biết trước để tìm hiểu nội dung chi tiết.
Ví dụ 1: Một ngày chủ nhật Long gọi điện cho Trang. Không có ai nhấc máy. Long quyết định gọi lại thêm 1 lần nữa. Như vậy Long đã biết trước là mình sẽ lặp lại gọi điện thêm 2 lần. Một ngày khác, Long quyết định cứ 10 phút gọi điện một lần cho Trang cho đến khi có người bắt máy.
Điều kiện: Có người nhấc máy thì kết thúc hoạt động lặp.
Ví dụ 2: Nếu cộng lần lượt n số tự nhiên đầu tiên (n = 1, 2, 3,...), cần cộng bao nhiêu số tự nhiên đầu tiên để ta nhận được tổng Tn nhỏ nhất lớn hơn 1000?
Điều kiện: Khi tổng Tn nhỏ nhất lớn hơn 1000 thì kết thúc hoạt động lặp
Mô tả thuật toán bằng liệt kê:
Mô tả thuật toán bằng sơ đồ khối:
Hình 1. Mô tả thuật toán bằng sơ đồ khối
KẾT LUẬN:
Cú pháp:
While < Điều kiện > do < Câu lệnh >;
Trong đó:
Hoạt động:
Ví dụ 3:
While a<=b do a:=a+1;
Ví dụ 4:
While a>b do
Begin
write('a>b');
a:=a-1;
End;
Ví dụ 5: Viết câu lệnh in ra 5 số tự nhiên liên tiếp bắt đầu bằng số 1.
Gợi ý giải:
Sử dụng lệnh lặp với số lần lặp chưa biết trước while…do
Đoạn chương trình mẫu:
n:=1
while n<=5 do
begin
writeln(n);
n:=n+1;
end;
Khi viết chương trình sử dụng cấu trúc lặp cần chú ý tránh tạo nên vòng lặp không bao giờ kết thúc.
Chẳng hạn, chương trình dưới đây sẽ lặp lại vô tận:
var a:integer;
begin
a:=5;
while a<6 do
writeln('A');
end.
Sau khi học xong Bài 8: Lặp với số lần chưa biết trước, các em cần ghi nhớ:
Các em có thể hệ thống lại nội dung kiến thức đã học được thông qua bài kiểm tra Trắc nghiệm Tin học 8 Bài 8 cực hay có đáp án và lời giải chi tiết.
Việc đầu tiên mà câu lệnh While ... do cần thực hiện là gì?
< câu lệnh > sau từ khóa Do trong câu lệnh While ... do được thực hiện ít nhất mấy lần?
Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:
i := 5;
While i>=1 do i := i – 1;
Câu 4- 10: Mời các em đăng nhập xem tiếp nội dung và thi thử Online để củng cố kiến thức về bài học này nhé!
Các em có thể xem thêm phần hướng dẫn Giải bài tập Tin học 8 Bài 8để giúp các em nắm vững bài học và các phương pháp giải bài tập.
Bài tập 1 trang 71 SGK Tin học 8
Bài tập 2 trang 71 SGK Tin học 8
Bài tập 3 trang 71 SGK Tin học 8
Bài tập 4 trang 71 SGK Tin học 8
Bài tập 5 trang 71 SGK Tin học 8
Trong quá trình học tập nếu có thắc mắc hay cần trợ giúp gì thì các em hãy comment ở mục Hỏi đáp, Cộng đồng Tin học DapAnHay sẽ hỗ trợ cho các em một cách nhanh chóng!
Chúc các em học tập tốt và luôn đạt thành tích cao trong học tập!
-- Mod Tin Học 8 DapAnHay
Việc đầu tiên mà câu lệnh While ... do cần thực hiện là gì?
< câu lệnh > sau từ khóa Do trong câu lệnh While ... do được thực hiện ít nhất mấy lần?
Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:
i := 5;
While i>=1 do i := i – 1;
Hãy cho biết kết quả của đoạn chương trình dưới đây?
a:=10;
While a < 11 do write (a);
Khi sử dụng lệnh lặp While ... do cần chú ý điều gì?
Hoạt động nào sau đây lặp với số lần lặp chưa biết trước?
Câu lệnh viết đúng cú pháp lệnh lặp với số lần chưa biết trước?
Câu lệnh lặp while…do có dạng đúng là:
Pascal sử dụng câu lệnh lặp nào sau đây để lặp với số lần chưa biết trước?
Hãy chỉ ra < câu lệnh > được lặp đi lặp lại trong đoạn lệnh: x:=1; While x<=5 do write(‘Hoa hau’);
Nêu một vài ví dụ về hoạt động lặp với số lần chưa biết trước.
Hãy phát biểu sự khác biệt giữa câu lệnh lặp với số lần lặp cho trước và câu lệnh lặp với số lần lặp chưa biết trước.
Hãy tìm hiểu các thuật toán sau đây và cho biết khi thực hiện thuật toán, máy tính sẽ bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình Pascal thể hiện các thuật toán đó:
a) Thuật toán 1
Bước 1. S \(\leftarrow\) 10, x \(\leftarrow\) 0.5
Bước 2. Nếu S \(\leq\) 5.2, chuyển tới bước 4.
Bước 3. S \(\leftarrow\) S - x và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
b) Thuật toán 2
Bước 1. S \(\leftarrow\) 10, n \(\leftarrow\) 0.
Bước 2. Nếu S ≥ 10, chuyển tới bước 4.
Bước 3. n \(\leftarrow\) n + 3, S \(\leftarrow\) S - n quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
Hãy tìm hiểu các cụm câu lệnh sau đây và cho biết với các câu lệnh đó chương trình thực hiện bao nhiêu vòng lặp? Hãy rút ra nhận xét của em.
a)
S:=0; n:=0;
while S<=10 do
begin n:=n+1; S:=S+n end;
b)
S:=0; n:=0;
while S<=10 do
n:=n+1; S:=S+n;
Hãy chỉ ra lỗi trong các câu lệnh sau đây:
a) X:=10; while X:=10 do X:=X+5;
b) X:=10; while X=10 do X=X+5;
c) S:=0; n:=0; while S<=10 do n:=n+1; S:=S+n;
Họ và tên
Tiêu đề câu hỏi
Nội dung câu hỏi
a) Tính và in ra tổng các số lẻ trong dãy vừa nhập.
b) Đếm xem trong dãy vừa nhập có bao nhiêu số lớn hơn 5.
Câu trả lời của bạn
viết chương trình tính tổng sau :S=1+2+3+...+n sao cho tổng s nhỏ nhất lớn hơn 500 (với n là số nguyên dc nhập vào từ bàn phím)
Câu trả lời của bạn
Em hãy viết chương trình pascal đơn giản để đưa ra màn hình các thông tin cá nhân : họ tên, giới tính, ngày tháng năm sinh, lớp
Câu trả lời của bạn
Program Tao_Xau_Ho_Ten;
Var HT, H, T :String;
VT,SL, i : Byte;
Begin
Write('Nhap Ho va Ten 1 nguoi :'); Readln(HT);
i:=1; SL:=0;
While HT[i]<>' ' do
Begin
SL:=SL+1;
i:=i+1;
End;
H:=Copy(HT,1,SL);
i:=Length(HT); SL:=0;
While HT[i]<>' ' do
Begin
SL:=SL+1;
i:=i -1;
End;
VT:=Length(HT) - SL +1;
T := Copy(HT,VT,SL);
Writeln('Ho la :',H);
Writeln('Ten la :,T);
Readln
ko bt ạ
Dữ liệu kiểu nguyên trong Pascal có tên là gì?
a. Integer; c. Real; d. Char;b. String;
Câu trả lời của bạn
Tính tổng 1=>N ( nhập từ bàn Phím )
Câu trả lời của bạn
var a: array [1...100];
begin
**
phaanf chính ápdu m sum
***
readln
end;
write (a=)
readln
end.
Tra google đó em có nhìu đáp án lắm phải bt google trước khi hỏi nha
Bạn dùng cái đầu nha :))
tính tổng dùng sum
Em hãy cho biết nguyên nhân nào dẫn đến lỗi lập trình khiến chương trình của em sẽ bị lặp vô hạn lần và đưa ra cách khắc phục?
Câu trả lời của bạn
Do điều kiện bị viết sai hoặc điều kiện luôn thỏa mãn
thiếu các dấu cần lưu ý
Trình bày cách tạo thư mục?,Tệp tin là gì? Có mấy loại tệp tin?Nêu quy tắc đặt tên cho tệp tin?
Câu trả lời của bạn
giúp ik nhìn tội quá
ko bt lm
giúp bạn ở trên đi các bạn
Ta thực hiện các lệnh gán sau : x:=1; y:=9; z:=x+y; z:=z*y; Kết quả thu được của biến z là:
(Chỉ được chọn 1 đáp án)
Câu trả lời của bạn
X= 1 và Y=9
Z ban đầu bằng tổng X+Y=1+9=10.
Sau đó Z gán bằng Z (cũ) nhân với Y (9) là Z=10 * 9 =90
Chọn B (90)
Tại 1 phòng thí nghiệm người ta muốn chuyển đổi 1 đồ vật có khối lượng N kg tương ứng bằng các quả cân sao cho tổng khối lượng của từng quả cân được chọn phải bằng N.
Phòng thí nghiệm có 3 loại quả cân có khối lượng 5kg, 2kg và 1kg.
Yêu cầu:
Nhập từ bàn phím 1 số nguyên dương N là khối lượng của vật.
Cho biết cần dùng ít nhất bao nhiêu quả cân, mỗi loại mấy quả ?
Câu trả lời của bạn
help me
Viết chương trình tính tích các số trong số nguyên n. Thí dụ: n = 13 thì kết quả là 1x3.
Câu trả lời của bạn
Nhập tử số và mẫu số của một phân số tìm dạng tối giản của phân số đó
Câu trả lời của bạn
Tính tổng Viết chương trình python tính và xuất ra màn hình tổng sau: 1 1 1 1 S= + + ...+ 1.3 2.4 3.5 .( 2) a a + + Với a là số nguyên dương nhập từ bàn phím. Kết quả làm tròn 1 chữ số thập phân.
Câu trả lời của bạn
hãy viết một chương trình Pascal để tìm kết quả của biểu thức sau: ( x - 2 )^2 ( x + 2 ) + ( x+2 ), trong đó x là số được nhập từ bàn phím. Sau đó in ra màn hình kết quả của biểu thức. Mọi người giải giúp em với ạ, em cảm ơn mọi người nhiều ạ !
Câu trả lời của bạn
Câu trả lời của bạn
program ct;
uses crt;
var i,n,x:integer;
S:real;
function gt(a:integer):longint;
var i:integer;
begin
gt:=1;
for i:=1 to a do
gt:=gt*i;
end;
begin clrscr;
S:=1;
write(‘Nhap so x: ‘); readln(x);
write(‘Nhap so n: ‘); readln(n);
for i:=1 to n do
S:=S+(x*i)/gt(i);
writeln(‘Tong S= ‘,S:4:2);
readln;
end.
có anh
Câu trả lời của bạn
Câu trả lời của bạn
Câu trả lời của bạn
: Hãy tìm hiểu mỗi đoạn chương trình Pascal sau đây và cho biết với đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp và cho biết giá trị của S là bao nhiêu.
while s<10 do S:=S+i; i:=i+1;
While n>20 do begin n:=n+5; S:=S – n; end;
While s<10 do S:=S+i; i:=i+1;
While S<10 do BeginS:=S+n; n:=n+2; end;
Câu trả lời của bạn
Câu 1:Sau khi thực hiện đoạn chương trình sau: S:=10; For i:=1 to 4 do S:=S+i; Giá trị của biến S bằng bao nhiêu?
A. 0
B. 14
C. 10
D. 20
Câu trả lời của bạn
D
Câu trả lời của bạn
0 Bình luận
Để lại bình luận
Địa chỉ email của hạn sẽ không được công bố. Các trường bắt buộc được đánh dấu *