Giúp mình với nha mik dg cần sang mai thi hk Viết chương trình sử dụng biến mảng để nhập từ bàn phím độ dài của dãi số và các phần tử trong dãy số đó. Tính tổng các phần tử trong dãy số và in kết quả ra màn hình.
2 câu trả lời
program ct;
uses crt;
var i,n,s:integer;
A:array[1..100] of integer;
begin
clrscr;
write('nhap n:=');readln(n);
for i:=1 to n do
begin
write('nhap mang A[',i,']:=');readln(A[i]);
end;
s:=0;
for i:=1 to n do s:=s+A[i];
writeln('tong cua day so la:',s);
readln
end.
Câu hỏi trong lớp
Xem thêm