uses crt;
var a:array[1..100]of integer;
n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
t:=t+a[i];
writeln('Tong cua day so la: ',t);
readln;
end.
viết chương trình sử dụng bến mảng nhập vào 1 dãy a gốm n số nguyên (n được nhập từ bàn phím). Tính tổng các số nguyên âm có trong dãy
Em hãy in ra các phần tử chẵn có trong mảng, biết số phần tử của mảng và giá trị của các phần tử của mảng được nhập từ bàn phím.
Viết chương trình tính tổng dãy số nguyên trong mảng một chiều. Với độ dài của mảng được nhập từ bàn phím tối đa là 20 phần tử? jup mình đi
viết chương trình nhập vào một mảng các số nguyên. Ghi ra màn hình giá trị trung bình cộng của mảng đó và in các phần tử nhỏ hơn giá trị trung bình cộng của mảng
Sử dụng biến mảng viết chương trình nhập n số nguyên từ bàn phím. sau đó đến xem trong mảng có bao nhiên phần tử dương.
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 của dãy cũng được nhập từ bàn phím . tính giá trị trung bình của dãy số được nhập vào?
Viết chương trình nhập hai số nguyên a,b bất kỳ từ bàn phím. Tính tích, thương của 2 số nguyên vừa nhập
Bài 9: Hãy viết chương trình nhập từ bàn phím hai số a, b. Hãy tính kết quả c là phép chia lấy phần dư, d là phép chia lấy phần nguyên
zạ giải giùm em cái này cho mảng A: 13, 24. 54,56, 34 ;a;b;c viết chương trình nhập mảng A bằng cách sủ dụng biến mảng in ra các số chẵn ở mảng trên tính A[2]+3*A[7]
