Trong ngôn ngữ lập trình Pascal, cho biết đoạn chương trình sau: T := 0 ; I := 0; While I < 50 do      Begin           T := T + I ;           I := I + 2           End ;

Giả sử {Dòng 2} sửa lại  I := 60, kết quả sau khi thực hiện đoạn CT trên là:

Câu hỏi liên quan

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

  for i:=1 to 10 do

  if (i mod  3 = 0) or (i mod 5 = 0) then write(i:3);

• Hãy chọn kết quả đúng của đoạn chương trình sau.

  s := 0;   for i:= 1 to 10 do  s:=s + i;  Write(s);

• Phát biểu nào dưới đây là đúng?

ZUNIA12

• Trong Turbo Pascal, cho đoạn chương trình(CT) sau T:= 0; for i:=20 downto 1 do   if (i mod  3 = 0) then T:= T+1;      writeln(‘T= ‘, T);

  Đoạn CT trên thực hiện công việc gì?

• Trong pascal, câu lệnh gán nào sau đây là sai:

• Hãy chọn kết quả đúng của đoạn chương trình sau.

  a :=  9; b := 7; c:=8;

  if a > b then c:=7 else c := 5;  Write(c);

• Trong Turbo Pascal, cho đoạn chương trình(CT) sau T:= 0; for i:=20 downto 1 do   if (i mod  3 = 0) then T:= T+1;      writeln(‘T= ‘, T);

   

  Với đoạn CT trên giá trị đầu là:

• Biểu thức nào sau đây là biểu thức số học:

• Trong ngôn ngữ lập trình Pascal, cho biết đoạn chương trình sau: T := 0 ; I := 0; While I < 50 do      Begin           T := T + I ;           I := I + 2           End ;

   

  Với giá trị I bằng bao nhiêu thì thoát khỏi vòng lặp While ... do … trên?

• Trong Turbo Pascal, cho A, B, C là các số thực, về mặt cú pháp câu lệnh nào sau đây là sai:

• Sau khi thi hành đoạn chương trình sau , thì biến x viết ra mà hình có giá trị là bao nhiêu ?. 

  A:= 4 ; B: = 1; X:= 2 ;
  IF A + B > 6 THEN X := X + A + B else X := 2; WRITE (X);

• Xét chương trình sau?

         Var a, b: integer;

         Begin

                     a:=102;

                     write(‘b=’); readln(b);

                     if a<b then write(‘Xin chao cac ban!’);

         end.

         Nhập giá trị cho b bao nhiêu để khi chạy chương trình nhận được kết quả ‘Xin chao cac ban!’?

• Trong Pascal để thực hiện chương trình ta nhấn các phím?

• Trong Turbo Pascal, cho đoạn chương trình(CT) sau T:= 0; for i:=20 downto 1 do   if (i mod  3 = 0) then T:= T+1;      writeln(‘T= ‘, T);

  Sau khi thực hiện đoạn CT trên giá trị T là:

• Trong Pascal, biểu thức (57 div 13) bằng:

• Biểu thức (25 mod 10) div 2 cho kết quả là

• Trong các hằng dưới đây, hãy chọn hằng lôgic

• x² biểu diễn trong pascal là

• Trong Turbo Pascal, cấu trúc If … then nào sau đây là dạng đủ:

• Để thực hiện chương trình ta dùng tổ hợp phím: