Var z:array[1..10000] of longint;
n,i,T:longint;
Begin
Readln(n);
For i:=1 to n do begin writeln('T', i, '='); Readln(z[i]);
T:= T + z[i];
End;
Writeln('Tong la ', T);
End.
Bạn thử kiểm tra lại nhé!
viết chương trình sử dụng biến mảng để nhập một dãy gồm N số nguyên từ bàn phím.In ra màn hình các số nguyên đó. Tính tổng và trung bình cộng của N số đó.
Giúp mình với ạ
viết chương trình nhập dãy n số nguyên dương từ bàn phím và đưa ra màn hình tích của dãy số nguyên đó(sử dụng biến mảng)
giúp mình với ạ, mình cảm ơn
Viết chương trình nhập vào một mảng không quá 20 số nguyên. tính tổng giá trị của các phân tử đó
sử dụng biến mảng Viết chương trình nhập vào dãy số gồm n số nguyên từ bàn phím in ra màn hình tổng các số dương trong dãy số đó Giúp mình với
Viết chương trình nhập vào mảng n số nguyên . Tính tổng các phần tử lớn nhất trong mảng
Viết chương trình nhập vào một mảng gồm n số nguyên.Đếm xem có bao nhiêu số dương và tính tổng các số đó cứu mình với
viết chương trình nhập vào 1 mảng số nguyên gồm 10 phần tử xuất ra màn hình phần tử số 3 . Lm ơn giúp mik vs ạ mik cần gấp xin cảm ơn😭
Viết chương trình nhập vào mảng số nguyên gồm 5 phần tử sau đó in ra màn hình phần tử có giá trị lớn nhất Câu 2: viết chương trình nhập vào mảng số nguyên gồm 6 phần tử sau đó in ra màn hình giá trị nhỏ nhất
1. Viết chương trình nhập vào máy 1 mảng số nguyên bất kỳ, thống kê và in ra số phần tử âm trong mảng.
2. Viết chương trình nhập vào máy 1 mảng số nguyên bất kỳ, thống kê và in ra số phần tử dương trong mảng.
Mn giúp mình với!!!!!!
