Chạy đoạn chương trình

a) S:=1; P:=2;

For i:=1 to 5 do S:=S+i; P:=P*S;

b)S:=1; P:=1;

For i:=1 to 3 do begin S:=S+1; P:=P*S end;

cho các đoạn chương trình sau:

a) S:=1; For i:=1 to 8 do S:=S+5

                     Writeln (S'='=S);

b) i:=1; S:=0 ; While S<10 do 

                                Begin S:=S+2; i:=i+1; End;

help:

cho S=1/4+1/9+1/16+...+1/10000

Khẳng định nào đúng

A. S < 1 B. S > 1 C. S > 2 D. S<0

Sử dụng câu lệnh For…do và While…do để viết chương trình
a) s=1+2+3
b) s=2+4+...+2n
c) s=1+2+3+...+n
d) s=1+3+5+…+(2n+1) 
e) s=1+1/2+1/3+...+1/n
f) p=1.2.3...n
h) s=1.2.3
i) s=1+1/2+1/3

GIÚP VỚI Ạ,CẦN SIU GẤP,HƯA TICK

tính:33...3(n-1 c/s 9)5.33...3(n-1 c/s 9)5

tính:66...6(n-1 c/s 9)7.66...6(n-1 c/s 9)7

tính:99...9(n+1 c/s 9).99...9(n+1 c/s 9)

tính:99...9(n c/s 9)5.99...9(n c/s 9)5

để tính tổng s=2+4+6 ... +n; 

em chọn lệnh:

a) for i:=1 to n do if (i mod 2)=0 then s:=s+1;

b) for i:=1 to n do if (i mod 2) <> 2 then s:=s+1;

c) for i:=1 to n do s:=s+1;

d) for i:=1 to n do if (i mod 2) = 1 then s:=s+1;

mn giúp em với ạ, cảm ơn mn nhiều

Câu 14:  Cho đoạn chương trình sau:

                S:=0;

                For i:=1 to 1 do S:=S+1;

                Sau khi chạy đoạn chương trình trên, giá trị S là:

A. S=100.             B. S=0.  C. S=1.  D. Không xác định.                                                                               

Câu 14:  Cho đoạn chương trình sau:

                S:=0;

                For i:=1 to 1 do S:=S+1;

                Sau khi chạy đoạn chương trình trên, giá trị S là:

A. S=100.             B. S=0.  C. S=1.  D. Không xác định.                                                                               

1. Câu lệnh pascal nào dưới đây dùng để tính tổng S= 1+2+3+...+50

A.For i:=1 to 50 do;S:=S+i;

C. For i:=1 to 50 do S:=S+i;

B.For i:=1 to 50 do S:=S+i;

D. For i:=1 to 50 do S:=S+1;