program chuongtrinh;
uses crt;
var i,s:integer;
a:array [ 1..10] of integer;
begin
for i:=1 to 10 do
begin
write (' a [',i,']= ');
readln ( a[i]);
end;
s:=0;
for i:=1 to 10 do s:= s+ a[i];
write (' Tong cua mang la: ',s);
readln
end.
P/S: Tham khảo nha!!!
Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số. Độ dài của dãy cũng được nhập từ bàn phím; tính tổng các phần tử
Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của dãy N số thực
Viết chương trình pascal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy và in ra màn hình số lớn nhất của dãy số vừa nhập từ bàn phím.
Viết chương trình pascal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số. Độ dài dãy số được nhập từ bàn phím. In ra màng hình số lớn nhất của dãy số.
Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên. Độ dài của dãy cũng được nhập từ bàn phím. In ra màn hình hiệu các số chẵn trong dãy số nguyên.
viết chuương trình pascal sử dụng biến mảng để nhập từ bàn phím N phần tử của 1 dãy số . In ra màn hình số lớn nhất và số nhỏ nhất . Độ dài N của dãy cũng được nhập từ bàn phím
Viết chương trình Pascal sử dụng mảng để nhập từ bàn phím các phần tử của một dãy số. Độ dài của dãy cũng được nhập từ bàn phím.
viết chương trình nhập vào 1 mảng gồm n phần tử được nhập từ bàn phím hãy tìm ra các phần tử chia hết cho 3 và 5 và vị trí các phần tử đó
viết c.trình sử dụng biến mảng và câu lệnh lặp
a) tính tổng của mảng có 10 phần tử, các phần tử đc nhập từ bàn phím
b) tính TB cộng của dãy số với độ dài dãy số được nhập từ bàn phím
c) tính tổng các số lẻ trong dãy số
