uses crt;
var a:array[1..50]of integer;
i:byte;
begin
clrscr;
for i:=1 to 50 do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to 50 do
write(a[i]:4);
readln;
end.
Viết chương trình nhập mảng A gồm N phần tử (tối đa 50 phần tử) a) Nhập các giá trị cho các phần tử của mảng. b) In phần tử là số chẵn có trong mảng và cho biết tổng của các số chẵn đó.
Viết chương trình, nhập mảng A gồm n phần tử (có tối đa 50 phần tử) a) nhập các giá trị cho các phần tử của mảng b) in phần tử là số chẵn có trong mảng và cho biết tổng của các số chẵn đó
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!!!!!!
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
Cho 1 mảng a gồm 100 phần tử em hãy viết chương trình đếm số lượng các phần tử chia hết cho giá trị x nhập vào tử bàn phím, in ra màn hình các phần tử đó Mình đang cần gấp mọi người giúp mình với ạ🤦
viết chương trình nhập và in giá trị của 50 phần tử trong mảng A
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 tích các phần tử có giá trị là số chia hết cho 3 Giúp nhé
Viết chương trình nhập vào mảng số nguyên gồm 5 phần tử sau đó in ra phần tử có giá trị là số nguyên dương
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 tổng phần tử có giá trị là số chia hết cho 3 và 5
