Câu 1 : 

Dạng thiếu:   * Cú pháp: If <điều kiện> then <câu lệnh>;

                       * Hoạt động: chương tình sẽ kiểm tra điều kiện. Nếu điều kiện được thỏa mãn, chương trình sẽ thực hiện câu lệnh sau từ khóa then. Ngược lại sẽ bỏ qua câu lệnh.

Dạng đầy đủ:  * Cú pháp: If <điều kiện> then <câu lệnh 1> else <câu lệnh 2>;

                         * Hoạt động: chương tình sẽ kiểm tra điều kiện. Nếu điều kiện được thỏa mãn, chương trình sẽ thực hiện câu lệnh lệnh 1 sau từ khóa then. Trong trường hợp ngược lại sẽ thực hiện câu lệnh 2. 

- Giải thích : Giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối . 

- Ví dụ : if ĐTB>=8 then write(‘ Hoc luc gioi ‘) 

Câu 2 : 

– 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

– Ví dụ:

       for i:= 1 to 5 do write(‘Tin hoc’);

Câu 3 : 

– 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

– Ví dụ:

       T:=0; i:=0;

       while i<=5 do

          begin

            T:=T+i; i:=i+1;

          end; 

Câu 4 : 

Câu lệnh lặp với số lần lặp biết trước chỉ thị cho máy tính thực hiện một lệnh hoặc một nhóm lệnh với số lần đã được xác định từ trước.
Trong câu lệnh lặp với số lần cho trước, điều kiện là giá trị của một biến đếm có giá trị nguyên đã đạt được giá trị lớn nhất hay chưa.
Trong câu lệnh lặp với số lần biết trước, câu lệnh được thực hiện ít nhất một lần, sau đó kiểm tra điều kiện.

Câu 5 :

program Bai_tap_1;
uses crt;
var i,n:longint;
begin
        clrscr;
        write('Nhap n: '); readln(n);
        writeln('  BANG CUU CHUONG ',n);
        i:=1;
        while i<=9 do begin
        writeln('   ',n,' * ',i,' = ',n*i);
        i:=i+1;
        end;
       readln;
end.

Chúc bạn học tốt :)))