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

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

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

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 = 1 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 + 1;

Write(Tong);

Trong NNLT Pascal câu lệnh Write( ‘5 x 4 = ‘ , 5*4 ) ; viết gì ra màn hình là :

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

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

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

readln(x);

y := (x+2)*x – 5 ;

writeln(‘gia tri cua y = ’, y);

Nếu nhập x = 2 thì có những thông tin gì ở ngoài màn hình?

Biểu thức Pascal B: = Sqr(sqrt(x1-x2)+sqrt(y1-y2)) 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, C: 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ố chẵn 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=25, b=10, c=6, k=3. Hãy xác định giá trị của biểu thức A:

A := Sqrt(a) + b div k >= a mod 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 := 15; x := a mod b ; Write(x);

End.

Để thoát khỏi phần mềm, trong Pascal ta nhấn tổ hợp phím:

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

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

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

Phép toán nào đúng khi số nguyên A chia hết cho 5:

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) or (n div 100 < 10)

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

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

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

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 2 = 1 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 3=0) then Tong:=Tong + 1;

Write(Tong);

Trong NN lập trình Pascal, biểu thức số học nào sau đây là không hợp lệ:

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

Trong 1 chương trình, biến M có thể nhận các giá trị: 10, 15, 20, 30, 40 và biến N có thể nhận các giá trị: 1.0, 1.5, 2.0, 2.5, 3.0. Khai báo nào trong các khai báo sau là đúng?

Với lệnh nào sau đây dùng để in giá trị M là kiểu số thực ra màn hình với độ rộng là 5 và có 2 chữ số phần thập phân?

Câu lệnh y:= (((x - 2)*x - 3)*x - 4)*x - 5; tính giá trị của biểu thức nào?

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ị 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, J: INTEGER;

  P, A, B, C: REAL;

  X: EXTENDED;

  K: WORD;

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?

Giả sử mảng a gồm các phần tử a[1]=1, a[2]=2, a[3]=3, a[4]=4, a[5]=5.

Xét đoạn chương trình sau:

S := 0;

For i :=1 to 5 do

           If a[i] mod 2 = 1 then S := S+a[i];

Write(S);

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

Để khai báo một mảng số thực có tên là Diem tối đa 100 phần tử, ta khai báo:

Thực hiện đoạn chương trình sau, ta thu được kết quả của a là:

a := 2;

While a<5 do a := a*3;

Write(a);

Thực hiện đoạn chương trình sau, cho biết chữ “Hello Word “ được in ra màn hình mấy lần?

i := 0;

While i <=3 do

Begin

Write(‘Hello Word’);

i:=i+1;

End;

Đoạn chương trình sau giải bài toán nào?

T := 0;

for i:=1 to M do

if i mod 2 = 1 then T := T + 1;