Các câu hỏi tương tự
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 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
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;
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.
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
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.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 5 DOIF a[i] mod 2 0 THEN S:S+a[i];writeln(‘S ’,S); A. 6 B. S 6 C. 9 D. S 9
Đọc tiếp
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.
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 5 DO
IF a[i] mod 2 = 0 THEN S:=S+a[i];
writeln(‘S = ’,S);
A. 6
B. S = 6
C. 9
D. S = 9
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 S ; i là biến kiểu nguyên Khi chạy đoạn chươq trình S:=0, i:=1; While i <= 6 do Begin S:=S+1 ; i:=i+2 ; End; Hỏi : Giá trị sau cùng của S là bao nhiêu ?
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.
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 5 DO
IF a[i] mod 2 = 1 THEN S:=S+a[i];
writeln(‘S = ’,S);
A. 6
B. S = 6
C. 9
D. S = 9
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 N2/Var A: array[0..4] of byte; T: 0; For i:0 to 4 do if a[i] div 30 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
Đọc tiếp
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