Ngôn ngữ dùng để viết các chương trình máy tính là:
a. Ngôn ngữ dịch b. Ngôn ngữ chương trình
c. Ngôn ngữ lập trình d. Ngôn ngữ máy
Câu 2: Trong các tên chương trình sau đây, tên nào không hợp lệ trong ngôn ngữ Pascal?
a. Thanhtoan; b. THANHTOAN;
c. THanhTOAn; d. Thanh toan;
Câu 3: Để in kết quả của biểu thức (5 + 20)*(10 div 3) lên màn hình, em dùng câu lệnh nào dưới đây:
a. Write(’(5 + 20)*(10 div 3)’); b. Write((5 + 20)*(10 div 3));
c. Write((5 + 20)*(10 div 3)’); d. Write(‘(5 + 20)*(10 div 3));
Câu 4: Cú pháp lệnh gán trong khai báo biến:
a.
c.
Câu 5. Câu lệnh: Writeln(‘Phan nguyen cua 22 / 5 la:’, 22 div 4); sẽ in ra kết quả:
a. Phan nguyen cua 22 / 4 la: 4
c. Phan nguyen cua 22 / 4 la: 5
b. Phan nguyen cua 22 / 4 la: 2
d. Máy báo lỗi sai kiểu dữ liệu.
Câu 6. Trong các khai báo sau, khai nào là không đúng nhất:
a. Var a:integer;
c. Const b=4;
b. Var c:byte;
d. Const d:=10;
Hãy tìm lỗi đoạn chương trình sau và sửa lại cho đúng: (1,5 điểm)
Program Vi_du;
Var a,b,c,s: Interger;
Begin
Write(’nhap chieu dai a =’); readln(‘a’);
Write(’nhap chieu rong b =’); readln(b);
S:=a*b
C:=(a+b)x2;
Writeln(’dien tich hinh chu nhat la: ’, ‘S’);
Writln(’chu vi hinh chu nhat la: ’,C);
Readln
End.
đoạn 2
Program Vi_du A;
Const pi:=3.14;
Var cv,dt: Integer
r:Real;
Begin
Write(’nhap ban kinh r =’); readln(‘r’);
cv=2*pi*r;
dt=pi*r*r;
Writeln(’chu vi hinh tron la: cv’);
Writeln(’dien tich hinh tron la: ’, ‘S’);
Readln;
End.
Câu 1: c.
Câu 2: c.
Câu 3: a.
Câu 4: b.
Câu 5: d.
Câu 6: d.
Câu 7: Đoạn 1:
Propram Vi_du;
Uses Crt;
Var a , b : integer;
C , S : real;
Begin
Clrscr;
Write ( ‘Nhap cheu dai:’ );
Readln (a);
Write ( ‘Nhap chieu rong:’ );
Readln (b);
S:=a*b;
C:=(a+b)*2;
Writeln ( ‘Dien tich hinh chu nhat la:’,S );
Writeln ( ‘Chu vi hinh chu nhat la:’,C );
Readln
End.
Đoạn 2:
Propram Vi_du_A; ( giữa các từ có dấu gạch nối )
Uses Crt;
Var cv , dt : real;
r : integer;
Const pi = 3.14;
Begin
Clrscr;
Write ( ‘Nhap ban kinh:’ );
Readln (r);
C:=r*2*pi;
S:=r*r*pi;
Writeln ( ‘Chu vi hinh tron la:’ , C : 6 : 2 );
Writeln ( ‘Dien tich hinh tron la:’ , S : 6 : 2 );
Readln
End.
*Lưu ý: Những dấu gạch chân là được sửa.
Câu 1: c.
Câu 2: c.
Câu 3: a.
Câu 4: b.
Câu 5: d.
Câu 6: d.
Câu 7: Đ 1:
Propram Vi_du;
Uses Crt;
Var a , b : integer;
C , S : real;
Begin
Clrscr;
Write ( ‘Nhap cheu dai:’ );
Readln (a);
Write ( ‘Nhap chieu rong:’ );
Readln (b);
S:=a*b;
C:=(a+b)*2;
Writeln ( ‘Dien tich hinh chu nhat la:’,S );
Writeln ( ‘Chu vi hinh chu nhat la:’,C );
Readln
End.
Đ 2:
Propram Vi_du_A; ( giữa các từ có dấu gạch nối )
Uses Crt;
Var cv , dt : real;
r : integer;
Const pi = 3.14;
Begin
Clrscr;
Write ( ‘Nhap ban kinh:’ );
Readln (r);
C:=r*2*pi;
S:=r*r*pi;
Writeln ( ‘Chu vi hinh tron la:’ , C : 6 : 2 );
Writeln ( ‘Dien tich hinh tron la:’ , S : 6 : 2 );
Readln
End.