Bài 1. Viết chương trình in bảng cửu chương với For Do

1. Bài toán

  Yêu cầu: Viết chương trình in ra màn hình bảng cửu chương từ 2 đến 9

• Input: Nhập bảng cửu chương cần hiển thị
• Output: In ra màn hình bảng cửu chương

2. Giải thuật:

Bước 1. Nhập thông tin: Nhập bảng cửu chương bạn cần in
Bước 2. Xử lý:

• Bước 2.1. Dùng câu lệnh lặp For Do để in ra màn hình bảng cửu chương

Bước 3. In ra màn hình bảng cửa chương.

3. Code Pascal:

Program Bang_cuu_chuong;
Var
   so,i :Integer;

Begin
   Write('Ban muon in bang cuu chuong so may ?: ');
   Readln(so);
   Writeln;
   Writeln;
   Writeln(' CHUONG TRINH IN BANG CUU CHUONG');
   Writeln('-------------------------------');
   Writeln;
   For i:=1 To 10 Do Writeln(so:2,' lan ',i:2,' = ',so*i:3);
   Readln
End.

4. Giải thích code

Dong code	Ý nghĩa
Program Bang_Cuu_chuong;	Đặt tên cho chương trình Bang_Cuu_chuong
Var so :Integer;	Khai báo biến so kiểu số nguyên
Write('Ban muon in bang cuu chuong so may ?: ');	In ra màn hình dòng chữ Ban muon in bang cuu chuong so may ?:
Readln(so);	Nhập số từ bàn phím cho biến so
Writeln;	In ra màn hình dòng trắng
Writeln;	In ra màn hình dòng trắng
Writeln(' CHUONG TRINH IN BANG CUU CHUONG');	In ra màn hình dòng chữ CHUONG TRINH IN BANG CUU CHUONG
Writeln('-------------------------------');	In ra màn hình dòng -------------------------------
Writeln;	In ra màn hình dòng trắng
For i:=1 To 10 Do Writeln(so:2,' lan ',i:2,' = ',so*i:3);	Cho biến i chạy từ 1 đến 10 thì in ra màn hình dòng tương ứng Ví dụ: Ta nhập số là 2 tức ta in cửu chương 2 như sau: i = 1 ---> 2 lan 1 = 2 i = 2 ---> 2 lan 2 = 4 i = 3 ---> 2 lan 3 = 6 i = 4 ---> 2 lan 4 = 8 i = 5 ---> 2 lan 5 = 10 i = 6 ---> 2 lan 6 = 12 i = 7 ---> 2 lan 7 = 14 i = 8 ---> 2 lan 8 = 16 i = 9 ---> 2 lan 9 = 18 i = 10 ---> 2 lan 10 = 20
Readln	Dừng màn hình khi chạy chương trình cho bạn xem

5. Kết Quả Pascal

Kết luận:
    ⦿ Bài này chúng ta đã được xét ở phần bài tập căn bản nhưng nó được viết rất thủ công.
    ⦿ Ở đây chúng ta đã cải tiến bài toán với câu lệnh For Do, làm cho code của bài toán ngày càng đơn giản ít dòng lệnh hơn.