Câu 2 : Thông thường, có thể xảy ra hai loại lỗi khác nhau khi dịch và thực hiện chương trình:  lỗi do viết sai quy tắc ( còn gọi là lỗi cú pháp) và những lỗi phát hiện trong khi chương trình thực hiện  hoặc sau khi chương trình đã thực hiện (Còn gọi là lỗi ngữ nghĩa). Ví dụ , một số lỗi ngữ nghĩa là : chia cho số 0, số vượt quá phạm vi bộ nhớ đã khai báo, thuật toán sai,…

Hãy điền các từ (Cú pháp, ngữ nghĩa) thích hợp vào chỗ trống (…) trong các câu sau :

a)Lỗi gặp phải khi chương trình không được viết theo các quy tắc của ngôn ngữ lập trình là lỗi ……………

b)Lỗi xảy ra trong khi thực hiện chương trình là lỗi ………………..

c)Chương trình dịch phát hiện được các lỗi………………..nhưng không phát hiện được các lỗi….

Cho chương trình Tính Tổng Các Số Tự Nhiên Từ S=1+2+3+ ...... (Khi Tổng S đầu tiên > 1000 thì dừng). Hỏi cộng bao nhiêu số?

Hãy Tìm lỗi trong chương trình và sửa lỗi viết lại chương trình cho đúng:

Program     tinh_tong;

Var         n  S: Integer

Begin

n:  0;

S = 0;

While S< 1000 do

n:= n + 1; 

                   S:= S + n

            Writeln(‘Can cong’,n-1,’so va tong dau tien > 1000 la’, S);  

    Readln;

End.

: Để viết chương trình tính diện tích hình thang như dưới đây. Bạn Tuấn đã ghi lại chương trình ra giấy, nhưng cố tình xếp lộn xộn các lệnh và viết sai một số chỗ. Em hãy giúp bạn thay đổi lại trình tự các lệnh và sửa các chỗ sai để được chương trình viết đúng.

          Begin;

           Uses Crt;

Var a,b,h: Integer;

                   S: Real

          Program   hinhthang;

          Writeln(‘DT hinh thang la:’,S);

          Write(‘Hay nhap hai day va chieu cao=’); Readln(a,b,h)

                   S := (a+b)*h/2;

Readln;

Cho đoạn chương trình sau. Em hãy tìm lỗi sai và sửa lại, sắp xếp  cho đúng?

                        Tính giá trị biểu thức: 12.x – 30 + 12

              Uses CRT:

          Clrscr.

            Begin

           Writeln(‘Gia tri bieu thuc 12.x – 30 + 12 = ’ , 12 *x – 30 + 12: 5:3)

           Program Tinh _gia_tri_bieu_thuc;

            Var x: Real;

            Write(‘Nhap gia tri x:  ’); readln(x);

            Readln;

            End.