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
Những câu hỏi liên quan
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 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);
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 đoạn chương trình sau:
T := 0 ;
FOR i := 1 to 10 DO
IF (i mod 3=0) and (i mod 5=0) THEN T := T + 1 ;
Sau khi thực hiện, T có giá trị?
A. 0
B. 5
C. 25
D. 33
Cho đoạn chương trình sau:
T := 0 ;
FOR i := 1 to 10 DO
IF (i mod 3=0) and (i mod 5=0) THEN T := T + i ;
Sau khi thực hiện, T có giá trị?
A. 0
B. 5
C. 25
D. 33
cho biết số vòng lặp và giá trị của biến s sau khi thực hiện đoạn chương trình: a) S:0; For i:2 to 8 do S :S+i b) S:0; n:1;For i:1 to 6 do Begin S:S+n; n:n+i; end;c) S:2;For i:1 to 10 do If(i mod 2)0 then S:S+i;d) S:0; i: 1,5;While S7 do S:S+i;e) S:0; i:1;While i9 do Begin S:S+i; i:i+2; End;f) S:2; i:1;While i 10 doBeginIf (i mod 2) then S:S+i; i:i+1;End;
Đọc tiếp
cho biết số vòng lặp và giá trị của biến s sau khi thực hiện đoạn chương trình: a) S:=0;
For i:=2 to 8 do S :=S+i
b) S:=0; n:=1;
For i:=1 to 6 do
Begin
S:=S+n;
n:=n+i;
end;
c) S:=2;
For i:=1 to 10 do
If(i mod 2)=0 then S:=S+i;
d) S:=0; i:= 1,5;
While S<7 do S:=S+i;
e) S:=0; i:=1;
While i<9 do
Begin
S:=S+i;
i:=i+2;
End;
f) S:=2; i:=1;
While i<= 10 do
Begin
If (i mod 2) then S:=S+i;
i:=i+1;
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];
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.
