1 trả lời
Virus máy tính là? [Tin học - Lớp 6]
2 trả lời
CÁCH CHUYỂN ĐỔI TỪ FOR – DO SANG WHILE – DO
[Nguyễn Văn Ninh – Giáo viên Tin học]
Ở bài 9 sách giáo khoa Tin học 11, học sinh đã được tìm hiểu câu lệnh lặp với số lần biết trước [For – do] và lặp với số lần chưa biết trước [While – do]. Bài viết xin chia sẻ với các em cách chuyển đổi từ câu lệnh For – do sang While – do [cách chuyển đổi ngược lại không phải lúc nào cũng thực hiện được]
1/ Cách chuyển đổi từ For – do sang While – do:
– Câu lệnh For – do:
+ Dạng tiến:
For := to do ;
+ Dạng lùi:
For := downto do ;
– Câu lệnh While – do:
While do ;
– Chuyển For – do thành While – do:
+ Cách 1:
:= ;
While [ = ] do
Begin
;
;
End;
2/ Ví dụ minh họa:
a/ Ví dụ 1: Tính và đưa ra tổng các số từ 1 đến n? [n là số nguyên dương được nhập vào từ bàn phím]
Sử dụng For – do:
Var i, n: integer;
s: word;
Begin
Readln[n];
For i:=1 to n do s:= s+i;
Write[s];
End.
Chuyển thành While – do:
+ Dạng 1:
Var i, n: integer;
s: word;
Begin
Readln[n];
i:=1;
While [i = 1] do
Begin
s:= s+i;
i:=i-1;
end;
Write[s];
End.
b/ Ví dụ 2: Lập trình để giải bài toán cổ sau:
“Vừa gà vừa chó.
Bó lại cho tròn.
Ba mươi sáu con,
Một trăm chân chẵn.
Hỏi có bao nhiêu con mỗi loại?”
Sử dụng For – do:
Var ga: byte;
Begin
For ga:=1 to 24 do
If [2*ga + [100-ga]*4 = 100] then
Write[‘so ga la:’,ga,’ so cho la:’, 36-ga];
End.
Chuyển thành While – do:
+ Dạng 1:
Var ga: byte;
Begin
ga:=1;
While [i=1] do
Begin
If [2*ga + [100-ga]*4 = 100] then
Write[‘so ga la:’,ga,’ so cho la:’, 36-ga];
ga:=ga-1;
End;
End.
Khách
Hãy nhập câu hỏi của bạn vào đây
Những câu hỏi liên quan
Viết chương trình pascal tính tổng S=1+ 2+3 +... +n?
a,Bằng lệnh for...do
b,Bằng lệnh while...do
- lý thuyết
- trắc nghiệm
- hỏi đáp
- bài tập sgk
Viết chương trình tính tổng S = 1+2+3+…+N. Với N là số nguyên nhập từ bàn phím? Sử dụng câu lệnh For..to..do
Các câu hỏi tương tự
Lorem ipsum dolor sit amet, consectetur adipiscing elit.Morbi adipiscing gravdio, sit amet suscipit risus ultrices eu.Fusce viverra neque at purus laoreet consequa.Vivamus vulputate posuere nisl quis consequat.
Create an account