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.

uses crt;

var n,i:integer;

a:array[1..100] of integer;

begin

clrscr;

Câu hỏi trong lớp Xem thêm
4 lượt xem
2 đáp án
14 giờ trước