Giá trị của biến k là bao nhiêu

1) cho đoạn ct
j := 0 ; k := 2;
For i := 1 to 20 do j := j + 2; write( j );
Sau khi thực hiện đoạn chương trình trên , giá trị của biến k bằng bao nhiêu?
A 16                                       C 36
B 26                                       D 46
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 begin S:=S+i; i:=i+1; end;
C n:=2; while n<5 do write('A');
D cả A và B
3) Khi thực hiện đoạn chương trình
n:=1; T:=70;
While T>20 do 
begin 
      n:=n+5; T:=T - n;
end;
Hãy cho bt giá trị của biến T bằng bn ?
A 14     B 15     C 16       D 17 
4) khai báo biến mảng : A: array[1...7] of real;. Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]); để gán giá  trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập đc nao nhiêu giá trị ?
A  4    B  5       C  6       D  7
sossss mình cần câu trả lời câu nào cũng đc miễn là có câu trả lời ạ