VN
0
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
NB
1 tháng 5 2023
vòng lặp với số lần chưa biết trước được thực hiện bằng cấu trúc vòng lặp while:
while (condition) do //condition là điều kiện nhá :v
begin
end;
nếu điều kiện đúng thì câu lệnh trong vòng lặp đc thực hiện, sai thì kết thúc.
VD:
var
x: Integer;
begin
x := 0;
while x < 5 do
begin
writeln(x);
x := x + 1;
end;
end.
//in ra đc từ 0 đến 4
TL
2
BA
3 tháng 5 2021
For to do:
- Cú pháp:
for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
- Giải thích:
+ Từ khóa: for, to, do
+ Biến đếm: kiểu nguyên
+ Giá trị đầu, giá trị cuối: giá trị nguyên (giá trị đầu < giá trị cuối)
+ Câu lệnh trong vòng lặp không làm thay đổi giá trị của biến đếm
+ Số lần lặp: giá trị đầu - giá trị cuối + 1
- Hoạt động:
+ Biến điếm sẽ nhận giá trị bằng giá trị đầu
+ Sau mỗi vòng lặp, biến đếm tăng thêm một đơn vị cho đến khi bằng giá trị cuối thì kết thúc lệnh lặp
While do:
- Cú pháp: while <điều kiện> do <câu lệnh>;
- Giải thích:
+ Từ khóa: while, do
+ Điều kiện thường là một phép so sánh
+ Câu lệnh có thể là câu lệnh đơn hay câu lệnh ghép
- Hoạt đông:
+ Kiểm tra điều kiện
+ Nếu điều kiện sai sẽ bị bỏ qua và kết thúc lệnh lặp
+ Nếu điều kiện đúng sẽ thực hiện câu lệnh và quay lại kiểm tra điều kiện
BU
22 tháng 3 2022
REFER
*Dạng thiếu:
if <điều kiện> then <câu lệnh>;
VD: if a>b then write(a);
HĐ: Nếu điều kiện đúng thì thực hiện câu lệnh, điều kiện sai thì kết thúc.
*Dạng đủ:
if <điều kiện> then <câu lệnh 1> else <câu lệnh 2>;
VD: if a>b then write(a) else write(b);
HĐ: Nếu điều kiện đúng thì thực hiện câu lệnh 1 ngược lại thực hiện câu lệnh 2 và kết thúc.
For <biến điếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
– Hoạt động: câu lệnh lặp sẽ thực hiện câu lệnh nhiều lần, mỗi lần là một vòng lặp. Số vòng lặp là biết trước và bằng giá trị cuối – giá trị đầu+1. Khi thực hiện, ban đầu biến đếm sẽ nhận giá trị đầu, sau mỗi vòng lặp, biến đếm được tự động tăng thêm 1 đơn vị cho đến khi bằng giá trị cuối.
Vd:
program ct;
uses crt;
var i,n,s:integer;
begin
clrscr;
write(‘nhap n:=’);readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln(‘tong cua n do tu nhien dau tien la:’,s);
readln
end.
* cú pháp while:
While <điều kiện> do<câu lệnh>;
– hoạt động:
B1:kiểm tra điều kiện
B2: nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại bước 1.
Vd:
T:=0;
i:=1;
while i<=100 do begin T:=T+1/i; i:=i+1; end;
writeln(T)
NV
0
NB
2 tháng 5 2023
for i:= 1 to n do
begin
end;
*Note: i là biến đếm đc khởi tạo với giá trị bắt đầu là 1. Vòng lặp sẽ thực hiện các câu lệnh bên trong begin và end với giá trị của i tăng lên 1 mỗi lần lặp cho đến khi i đạt giá trị n. Sau đó, các câu lệnh bên ngoài vòng lặp sẽ được thực hiện tiếp.
VD: nếu ta muốn in ra một dãy số từ 1 đến 10, ta có thể sử dụng câu lệnh lặp với số lần biết trước như sau:
for i:= 1 to 10 do
begin
writeln(i);
end;
kết quả sẽ ra từ 1 đến 10
7 tháng 3 2022
Tham khảo:
*cú pháp For:
For <biến điếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
- Hoạt động: câu lệnh lặp sẽ thực hiện câu lệnh nhiều lần, mỗi lần là một vòng lặp. Số vòng lặp là biết trước và bằng giá trị cuối - giá trị đầu+1. Khi thực hiện, ban đầu biến đếm sẽ nhận giá trị đầu, sau mỗi vòng lặp, biến đếm được tự động tăng thêm 1 đơn vị cho đến khi bằng giá trị cuối.
Vd:
program ct;
uses crt;
Var i,n,s:integer;
begin
clrscr;
write('nhap n:=');readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln('tong cua n do tu nhien dau tien la:',s);
readln
end.