Muốn kiểm tra đồng thời cả ba giá trị của A, B, C có cùng lớn hơn 0 hay không ta viết câu lệnh If thế nào cho đúng ?
A. If A, B, C > 0 then …;
B. If (A > 0) and (B > 0) and (C > 0) then …;
C. If A>0 and B>0 and C>0 then …;
D. If (A>0) or (B>0) or (C>0) then …;
Giải bởi Vietjack
Đáp án đúng : B
Thực hiện đoạn chương trình sau, ta thu được kết quả của Q là:
Q:= 0;
For i:= 1 to 10 do
if (i mod 3 = 0) and (i mod 5 = 0) then Q:= Q+i;
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à:
Với M = 3 và N = 6, hãy cho biết giá trị của D sau khi thực hiện đoạn chương trình sau?
D:= 0;
for i:= M to N do
if i mod 5 = 0 then D:= D+1;
Để 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:
Với cấu trúc rẽ nhánh IF <điều kiện> THEN <câu lệnh 1> ELSE <câu lệnh 2> ;
Câu lệnh 1 sẽ được thực hiện khi:
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);
Đ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;
Hãy cho biết giá trị của M sau khi thực hiện đoạn chương trình sau với a=19 và b=12 ?
M := a ;
If a<b then M := b ;
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;
