Câu 6: Cho biết kết quả in ra màn hình của đoạn chương trình sau

Câu a)

          i := -1;

          j:= 20;

For   k:= 1 to 5 do

          If  k   mod   2  = 0   then    i:= i + 1;

j := j + i;

Writeln(i,‘   ’,j);

Câu b)

n := 127;

m := 0;

While  n < >0  do

Begin

                   m := m * 10 + n  mod  10;

                   n := n  div  10;

end;

writeln(m);

Mấy bạn giúp mình câu này với :

BTLT1. Xác định các câu lệnh sau đây đúng hay sai?

a.For i=1 to 5 do writeln('Hello');

b.For j:=1.5 to 5 do writeln('Hello');

c.Var i: real; For i:=1 to 5 do writeln('Hello');

d. For k:=10 to 5 do writeln('Hello');

BTLT2. Câu lệnh lặp bao nhiêu lần và giá trị của biến S sau khi thực hiện lệnh bằng bao nhiêu ?

S:=0;

For i:=3 to 8 do S:=S+2;

Câu 1: Cho S và i là biến nguyên. Khi chạy đoạn chương trình:

S := 0;

for i:= 1 to 3 do s := s+i;

Kết quả in lên màn hình là của s là :

A. 15             B. 6            C. 11             D. 22

Câu 2:          Trong Pascal, câu lệnh nào sau đây là đúng?

A. S:=1;While S<10 do write(S);

B. i:=0; S:=1;While s<10 do S:=S+i; i:=i+1;

C. n:=2; While n<5 do write(‘A’);

D. S:=10; While S>9 do write(S);

Câu 9: Sau khi thực hiện chương trình sau, giá trị của biến j bằng bao nhiêu?

j := 0;

For   i := 1  to  5  do  j := j + 2;

A.  0              B.  2                C.  5            D.  10