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

0 bình luận về “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”

1. 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.

   Bình luận

2. * 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 !!!

   Bình luận