Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 = 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A. 2; 4; 6; 8;10
B. 1; 3; 5; 9
C. 1; 3; 5;7; 9
D. 4; 6; 8;10
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 = 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A. 2; 4; 6; 8; 10
B. 1; 3; 5; 9
C. 1; 3; 5; 7; 9
D. 4; 6; 8; 10
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 <> 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A. 2; 4; 6; 8;10
B. 1; 3; 5; 9
C. 1; 3; 5; 7; 9
D. 4; 6; 8; 10
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 <> 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A. 2; 4; 6; 8;10
B. 1; 3; 5; 9
C. 1; 3; 5;7; 9
D. 4; 6; 8;10
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:
D:=0;
FOR i:=1 to 5 DO
IF a[i] mod 2 = 0 THEN D:= D + 1;
writeln(‘D = ’,D);
A. D = 2
B. 2
C. 3
D. D = 3
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:
D:=0;
FOR i:=1 to 5 DO
IF a[i] mod 2 = 1 THEN D:=D+1;
writeln(‘D = ’,D);
A. D = 2
B. 2
C. 3
D. D = 3
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
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
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 = 0 then S := S+a[i];
Write(S);
Kết quả hiện ra màn hình là:
A. S=6
B. 6
C. 9
D. S=9
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à:
A. 9
B. S=6
C. 6
D. S=9
