Giúp e viết ctrinh lệnh while vs for vs ạ😢😢

viết chương trình lệnh while...for:

→ For

Program phtvs;

Uses Crt;

Var a,i:byte;

Begin

a:=10;

For i:=1 to 10 do a:=a+1;

End.

→ While

Program phtvs;

Uses Crt;

Var a,i:byte;

Begin

a:=10;

While i>1 do a:=a+1;

End.

Cấu trúc lệnh while..do..:

while <điều kiện> do <câu lệnh>;

giải thích: nếu điều kiện đúng, câu lệnh ddc thực hiện, sau đó lại lặp lại cho đến khi điều kiện sai

VD:

n:=10;

while n>0 do n:=n-1;

Cấu trúc lệnh for..to..do..:

for <biến 1>:=<giá trị 1> to <giá trị 2> do <câu lệnh>;

giải thích: lặp đi lặp lại câu lệnh n lần (n=giá trị 2-giá trị 1)

VD:

a:=10;

for i:=1 to 5 do a:=a-1;