Vậy khi chạy đoạn chương trình, nó kết thúc tại S = 9 và i = 5.
à nó chaỵ đến khi nào i>6 nhá
lần 1 thì s=1 và i=3
lần 2 thì s=2 và i=5
lần 2 thì s=3 và i=7 đến đây i>6 nên lệnh while dc dừng lại nha
Sau khi thực hiện đoạn chương trình sau, giá trị của S bằng bao nhiu
s:=0 ; i:=0;
While i<50 do
Begin
s:=s+i
i:=i+5
End.
Sau khi thực hiện đoạn chương trình sau, giá trị của S bằng bao nhiu
s:=0 ; i:=0;
While i<50 do
Begin
s:=s+i
i:=i+5
End.
A.276
B.225
C.0
D.275
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:
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
1/ Đoạn chương trinh sau thực hiện i:=1; S:=0; While (i < N) Do begin S:=S+i; i:= i+2; end; Write('S = ',S);
a.Tinh tổng các số lẽ từ 1 đến N-1
b.Tính tổng các số từ 1 đến N
c.Tính tổng các số chân từ 1 đến N
d.Tính tổng các số lẽ từ 1 đến N
2/Var A: array[0..4] of byte; T: 0; For i:=0 to 4 do if a[i] div 3=0 then T:-T+ a[i]; Khi cho giá trị các phần của mảng lần lượt như sau: (9,2,12,1,6). Kết quả T?
a.3
b.27
c.2
d.38
Trong ngôn ngữ lập trình pascal đoạn chương trình sau thực hiện công việc gì S1 := 'hong'; S2 := 'hoa'; i :=pos(S2, S); While i 0 do Begin Delete(S,i,2); Insert(S1,S,i); i := pos (S2,S); End;
Cho đoạn chương trình sau:
T := 0 ; i:=1;
WHILE i <= 10 DO
BEGIN
IF i mod 2 = 0 THEN T := T + i ;
i:=i+1;
END;
Sau khi thực hiện, T có giá trị?
A. 18
B. 22
C. 25
D. 30
