Question

Viết chương trình tính tổng n số: x1+x2+x3+.....+x4( với n và x đc nhập từ bàn phím) sử dụng lệnh while....do và for....do

Comments

phải là xn chớ sao lại là x4 được bạn

Answer 1

progam bt;

var        X:array[1..100] of integer;i,S,n:integer;

begin

             readln(n);

             for i:=1 to n do read(X[i]);  readln;

             i:=0;S:=0;

             while i