Biến Hoten lưu trữ giá trị hằng xâu ‘Nguyen Van Troi’ thì Hoten[5] cho ta kí tự là:

Cho đoạn chương trình sau:

s := 'Mua Thu';

write(upcase(s[1]));

Kết quả in ra màn hình là:

Cho đoạn chương trình sau:

s1 := ‘abc’; s2 := ‘abcd’;

write(pos(s1, s2));

Kết quả in ra màn hình là:

Cho đoạn chương trình sau:

s := ‘500 ki tu’;

write(length(s));

Kết quả in ra màn hình là:

Cho đoạn chương trình sau:

s1 := ‘123456789’;

s2 := copy(s1, 3, 1);

write(s2);

Kết quả in ra màn hình là:

Cho đoạn chương trình sau:

s1 := ‘123’; s2 := ‘abcd’;

insert (s1, s2 ,4);

write(s2);

Kết quả in ra màn hình là:

Cho đoạn chương trình sau:

s := ‘123456789’;

delete (s, 1, 9);

write(s);

Kết quả in ra màn hình là:

Trong các phát biểu sau, phát biểu nào sai?

Cho đoạn chương trình sau:

s1:= ‘123456’; s2:= ‘abc’;

write(s1+s2);

Kết quả in ra màn hình là:

Trong Pascal, cú pháp khai báo biến kiểu xâu là:

Biến Hoten lưu trữ giá trị hằng xâu ‘Nguyen Van Troi’ thì Hoten[4] cho ta kí tự là:

Viết chương trình:

- Nhập mảng một chiều các số nguyên (không quá 100 phần tử).

- Đếm và tính tổng các số chẵn và là bội của 3. Thông báo kết quả ra màn hình.

Viết câu lệnh rẽ nhánh tính:

Cho giá trị a=31, b=16, c=8, d=5. Hãy xác định giá trị của biểu thức D:

D:= sqr(d) + b > c*d + a

(Tính cụ thể từng bước)

Cho biết kết quả sau khi thực hiện lệnh:

Begin

a := 100;  b := 30;  x := a div b; Write(x);

End.

Để biên dịch chương trình, trong Pascal ta nhấn tổ hợp phím:

Để nhập giá trị cho 2 biến a và b ta dùng lệnh:

Để đưa ra màn hình giá trị của biến a kiểu nguyên và biến b kiểu thực ta dùng lệnh:

Biểu thức 3 div 7 có giá trị là:

Cho biết kết quả của biểu thức (2*((45 mod 3) +12)) div 5 là bao nhiêu?

Phép toán nào đúng khi số nguyên A là số lẻ:

Trong pascal, biểu diễn sqr(x) có nghĩa là:

Biểu thức nào không phải là biểu thức trong Pascal?

Xét biểu thức logic: (n mod 100 > 10) and (n div 100 < 10)

Với giá trị nào của n sau đây, biểu thức có giá trị đúng?

Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình:

i:=1;

While i <5 do

Begin

       if I mod 3 = 0 then Write(‘TIN HOC’);

i:=i+1;

End;

Chữ TIN HOC được in ra màn hình mấy lần

Cho biết kết quả của đoạn chương trình sau?

N:=5; Tong:=0;

For i:=1 to n do

If (i mod 2=0) then Tong:=Tong + i;

Write(Tong);

Cho đoạn chương trình:

Kq:=1;

For i:=1 to 5 do

Kq:=Kq*i;

Kết quả sau khi chạy là :

Biểu thức ((35 mod 9) div 5) có kết quả là mấy?

Biến X có thể nhận giá trị: 0.5; 1.5; 2.5; 3.5; 4.5 và biến Y có thể nhận các giá trị 0; 1; 3; 5; 7; 9. Khai báo biến nào sau đây là đúng?

Cho đoạn chương trình sau: x:= 10; y:= 30; writeln(‘x+y’); kết quả màn hình sẽ là gì?

Biểu thức Pascal: (a+cos(x))/sqrt(sqr(a)+sqr(x)+1) khi chuyển sang toán học có dạng:

Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0). Với giá trị nào của m dưới đây biểu thức trên cho giá trị false?

Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:

Var M, N, I: INTEGER;

P, A, B: REAL;

X: EXTENDED;

    K: WORD;

Viết chương trình:

- Nhập mảng một chiều các số nguyên (không quá 100 phần tử).

- Đếm và tính tổng các số lẻ và là bội của 5. Thông báo kết quả ra màn hình.

Viết câu lệnh rẽ nhánh tính:

Cho giá trị a=31, b=16, c=8, d=5. Hãy xác định giá trị của biểu thức C:

C := a mod c + d >= sqrt(b) + c

(Tính cụ thể từng bước)

Cho biết kết quả sau khi thực hiện lệnh:

Begin

a := 100; b := 30; x := a mod b ; Write(x);

End.

Để chạy chương trình, trong Pascal ta nhấn tổ hợp phím:

Để đưa ra màn hình giá trị của biến x kiểu nguyên và biến y kiểu thực ta dùng lệnh: