Viết chương trình nhập vào dãy số nguyên a1,a2....an (n
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
n = int(input("Nhập số phần tử của dãy: "))
a = [ ]
# đếm số chẵn
even_count = 0
# đếm số lẻ
odd_count = 0
for i in range(n):
a.append(int(input("Nhập phần tử thứ {0}: ".format(i+1))))
for i in a:
if i % 2 == 0:
even_count += 1
else:
odd_count += 1
print("Số lượng số chẵn trong dãy: ", even_count)
print("Số lượng số lẻ trong dãy: ", odd_count)
n = int(input("Nhập số phần tử của dãy: "))
a = [ ]
# đếm số chẵn
even_count = 0
# đếm số lẻ
odd_count = 0
for i in range(n):
a.append(int(input("Nhập phần tử thứ {0}: ".format(i+1))))
for i in a:
if i % 2 == 0:
even_count += 1
else:
odd_count += 1
print("Số lượng số chẵn trong dãy: ", even_count)
print("Số lượng số lẻ trong dãy: ", odd_count)
Đúng KO Ạ MK KO CHẮCn = int(input("Nhap so phan tu cua day: "))
a = [ ]
for i in range(n):
a.append(int(input("Nhap phan tu thu " + str(i+1) + ": ")))
max_value = a[0]
max_index = 0
for i in range(1, n):
if a[i] > max_value:
max_value = a[i]
max_index = i
print("Gia tri lon nhat trong day la:", max_value, "tai vi tri", max_index+1)
n = int(input("Nhập n: "))
a = [ ]
for i in range(n):
a.append(int(input(f"Nhập phần tử a[{i}]: ")))
print("Dãy số vừa nhập:")
# In dãy số theo thứ tự ngược lại
print(a[::-1])
if a == a[::-1]:
print("Dãy số là dãy đối xứng")
else:
print("Dãy số không phải là dãy đối xứng")
uses crt;
var a:array[1..100]of integer;
i,n,dem,k:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap k='); readln(k);
dem:=0;
for i:=1 to n do
if a[i]=k then inc(dem);
writeln('Trong day co ',dem,' phan tu co gia tri bang ',k);
readln;
end.
uses crt;
var a:array[1..50]of longint;
i,n:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
for i:=1 to n do write(a[i]:4);
readln;
end.
uses crt;
var a:array[1..100]of integer;
i,n,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
dem:=0;
for i:=1 to n do
if a[i] mod 3=0 then inc(dem);
writeln(dem);
readln;
end.
THAM KHẢO: