Hãy viết cú pháp khai báo lệnh lặp While-do và lệnh For trong Pascal. Lấy VD minh hoạ cú pháp
Hãy viết cú pháp khai báo lệnh lặp While-do và lệnh For trong Pascal. Lấy VD minh hoạ cú pháp
By Arya
By Arya
Hãy viết cú pháp khai báo lệnh lặp While-do và lệnh For trong Pascal. Lấy VD minh hoạ cú pháp
For <biến đếm >:=<giá trị đầu >to < giá trị cuối >do<câu lệnh>;
While <điều kiện> do<câu lệnh>;
vd:
var i,n,x : integer;
begin
writeln(‘ nhap n’);readln(n);
x:=1;
For i:=1 to n do
begin
while x<n do x:=x+1;
end;
readln;
end.
* Cú pháp khai báo lệnh lặp While…do
Cú pháp: While <Điều kiện> DO <Câu lệnh>
Ví dụ: Viết chương trình nhập vào số nguyên dương N, in ra ước số lớn nhất của số N (khác N).
Var n, i : integer;
Begin
Write(‘Nhập số n = ‘);
Readln(n);
i := n – 1;
While n mod i <> 0 do
i := i – 1;
Writeln(‘Ước số lớn nhất của số ‘, n , ‘ là : ‘, i);
Readln;
End.
* Cú pháp khai báo lệnh lặp For…to
– Cú pháp: for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
– Ví dụ:
for i:= 1 to 5 do write(‘Tin hoc’);
CHÚC BẠN HỌC TỐT !!!