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
Nêu các lệnh nhập , xuất dữ liệu trong pascal và ý nghĩa của từng lệnh
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
tớ ko bít
Câu trả lời của bạn
Viết chương trình mà người ta nhập các số thực từ 1 đến 10
giúp mình vs ạ mình cảm ơn nhiều
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
Câu trả lời của bạn
Câu trả lời của bạn
Hãy phân biệt sự khác nhau giữa câu lệnh lặp với số lần biết trước và số lần chưa biết trước
Câu lệnh lặp với số lần biết trước :
- Chỉ thị cho máy tính thực hiện 1 lệnh hay 1 nhóm lệnh với số lần đã được xác định từ trước.
- Điều kiện là 1 giá trị của 1 biến đếm có giá trị nguyên
Câu lệnh lặp với số lần chưa biết trước :
- Chỉ thị cho máy tính thực hiện 1 lệnh hay 1 nhóm lệnh với số lần lặp chưa biết trước.
ko bt đúng ko
- Điều kiện tổng quát hơn, có thể là kiểm tra của 1 giá trị có thực, cũng có thể là 1 điều kiện tổng quát khác.
yêu cầu: 1.in ra n phần tử trên 1 dòng
2. in ra tổng của n phần tử
3. in ra tổng các phần tử là số lẻ
4. in ra số lượng số lẻ và số chẵn
Câu trả lời của bạn
Câu trả lời của bạn
Cái này là mình làm tính tổng các số lẻ từ 1=>n nha bạn!!
Program tinh_tong_so_le;
Uses crt;
Var n,i,t:integer;
Begin
Clrscr;
Write('Nhap n: ');Readln(n);
t:=0;
For i:=1 to n do
Begin
If i mod 2<>0 then t:=t+i;
End;
Writeln('Ket qua: ',t);
var a:array [1..100] of integer;
le ,i:integer;
begin
write ('nhap gia tri mang=');
readln(n);
for i:=1 to n do begin
write ('a[',i,']=');
readln(a[i]);
end;
le:=0;
for i:=1 to n do
if a[i] mod 2 <> then
le:=le+a[i];
write(' tong cac so le la ',le);
readln;
end.
Bạn kiểm tra thử nha mk cũng chưa thử nữa
Viết chương trình tính tổng 100 số tự nhiên đầu tiên có sử dụng câu lệnh lặp chưa xác định while...do và nêu thuận toán?
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
Cho một dãy gồm n số nguyên, viết chương trình thực hiện các yêu cầu sau:
a: Nhập số phần tử của dãy và giá trị của từng phần tử từ bàn phím
b: In ra màn hình giá trị lớn nhất và giá trị nhỏ nhất của dãy
c: Tính tổng và giá trị trung bình cộng của dãy. Ghi kết quả ra màn hình
d: Tính tổng và giá trị trung bình cộng của các giá trị là số chẵn. Ghi kết quả ra màn hình
e: Sắp xếp lại dãy theo thứ tự giảm dần
Câu trả lời của bạn
sử dụng câu lệnh while...do, viết chương trình để nhập số tự nhiên n và tính tổng các số thực sự của n
Câu trả lời của bạn
Em hãy sử dụng ngôn ngữ Pascal nhập vào 2 số nguyên a và b đưa ra kết quả so sánh hai số a và b, tích và in ra tích của 2 số đó.
mọi người giúp em với ạ. Thứ 3 em thi rồi.
Câu trả lời của bạn
Program A_VA_B;
Uses crt;
Var a,b:integer;
Begin
Clrscr;
Writeln('Nhap vao so a: ');Readln(a);
Writeln('Nhap vao so b: ');Readln(b);
If a>b then
Writeln('a lon hon b');
If a
Writeln('a be hon b');
Else
Writeln('a bang b');
Writeln('Tich cua a va b la: ',a*b);
End.
Viết chương trình nhập vào một dãy số nguyên xác định số đó ra màn hình tính tổng các số dương và xuất ra màn hình
Câu trả lời của bạn
Chương trình nhập số nguyên từ bàn phím rồi tính tổng các số dương rồi xuất ra màn hình:
uses crt;
var i,n,duong:integer;
A:array[1..100] of integer;
begin
clrscr;
write('Nhap so phan tu n: '); readln(n);
for i:=1 to n do begin
write('A[',i,']='); readln(A[i]);
end;
duong:=0;
writeln('Cac so duong la: ');
for i:=1 to n do begin if A[i]>0 then duong:=duong+A[i]; write(A[i],' '); end;
write('Tong cac so duong la: ',duong);
readln
end.
Câu trả lời của bạn
Em hãy viết chương trình tính tổng N số tự nhiên đầu tiên sao cho tổng nhỏ hơn 800, với N số tự nhiên được nhập vào từ bàn phím và xuất ra số tự nhiên N và tổng S tính được?
mình đang cần gấp!!!!!!!!
cảm ơn mn nhìu
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 *