Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
quân nguyễn

 

viết theo kiểu lớp 8 dùm mik nha

b)    Viết chương trình nhập vào một mảng có n(n<50) phần tử và tính tổng các phần tử trong mảng đó?

Nguyễn Lê Phước Thịnh
30 tháng 4 2022 lúc 21:51

uses crt;

var a:array[1..50]of integer;

i,n,t:integer;

begin

clrscr;

readln(n);

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

t:=0;

for i:=1 to n do 

t:=t+a[i];

writeln(t);

readln;

end.


Các câu hỏi tương tự
Vochehoang
Xem chi tiết
Minh Duy
Xem chi tiết
quân nguyễn
Xem chi tiết
Trần Văn Việt Hùng
Xem chi tiết
Nguyễn Ngọc Thiện Nhân
Xem chi tiết
Mai Phương Lê
Xem chi tiết
phạm hải nam
Xem chi tiết
Nguyễn Thị Phương Đan
Xem chi tiết
Layla
Xem chi tiết