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

S := 0 ;

FOR i := 1 to 10 DO

IF (i mod 3=0) or (i mod 5=0) THEN S := S + i ;

Sau khi thực hiện, S có giá trị?

A. 0

B. 5

C. 25

D. 33

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

S := 0 ;

FOR i := 1 to 10 DO

IF (i mod 3=0) or (i mod 5=0) THEN S := S + 1 ;

Sau khi thực hiện, S có giá trị?

A. 0

B. 5

C. 25

D. 33

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

S := 0 ;

FOR i := 1 to 10 DO

IF i mod 2 = 1 THEN S := S + i ;

Sau khi thực hiện, S có giá trị?

A. 3

B. 5

C. 25

D. 30

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

S := 0 ;

FOR i := 1 to 10 DO

IF i mod 2 = 1 THEN S := S + 1 ;

Sau khi thực hiện, S có giá trị?

A. 3

B. 5

C. 25

D. 30

Cho biết giá trị của d sau khi thực hiện đoạn chương trình sau: S:='Hoang Thi Thu Hong' ; d:=0; For i:=1 to length(S) do Begin S[i]:= Upcase(s[i]); If s[i]= 'H' then d:= d+1; End;

Cho biết kết quả sau khi thực hiện đoạn chương trình sau:
S:=0;
FOR i:=1 to 15 DO
 IF a[i] mod 2 = 0 THEN 
        S:=S+a[i];
writeln(‘S = ’,S);

Câu 1: Sau khi thực hiện chưng trình pascal sau đây, biến S có giá trị là bao nhiêu ?    Var x : integer;

Begin

S:=0

For i:=1 to 10 do 
If ( i mod 2) = 0 then S:=S+i;

Readln;

End

A.10 B. 20 C. 30 D. 40

Câu 2: Khi thực hiện đoạn chương trình sau, kết quả trên màn hình là:
So:=1;

While so<10 do Begin 

Write (so : %);

So:= So +2;

End.

mảng a là 6 8 5 2 7.Sau khi đoạn chương trình sau được thực hiện,giá trị của S bằng bao nhiêu?s:=0;n:=0;for i:=2 to 5 do while (a[i] mod i0) do i:= i+1; if a[i]=n then writeln a[i];