Viết chương trình nhập từ bàn phím dãy số nguyên A có n phần tử a1,a2, ..,an k quá 1000 ,tính và in ra màn hình số lượng các số lẻ của dãy A

vuhanh261002

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 18 xem

1 trả lời

Thích Trả lời

thuhuyen06092003

uses crt;
var n, i, result: longint;
a: array[1..1000] of longint;
begin
clrscr;
readln(n);

for i:=1 to n do
begin
read(a[i]);
if a[i] mod 2 = 1 then inc(result);
end;

writeln(result);
readln; readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

ngan2302

program so_le;

uses crt;

var A:array [1..1000] of integer;

n,i,d: integer;

Begin

write('Nhap so phan tu: '); readln(n);

for i:=1 to n do

begin

write('A[',i,']='); readlnA[i]);

end;

write('Cac so le cua day: ');

for i:=1 to n do

if A[i] mod 2<>0 then

begin

write(i,' ');

d:=d+1;

end;

writeln;

write('Co ',d,' so le trong day A');

readln

End.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Tại sao khi rót nước nóng vào cốc thủy tinh dầy thì cốc dễ vỡ hơn khi rót nước nóng vào cốc thủy tinh móng ? Nêu cách khắc phục ?

Những định hướng thảo luận của GV giảng dạy với các thành viên trong tổ chuyên môn gồm Giải hộ mk trước 9h15 với ạ

C/m câu tục ngữ Uống nước nhớ nguồn

Câu1 : Vân sinh ra trong một gia đình nghèo nhưng lại ham chơi và lười học không nghe lời cha mẹ nhiều lần Vân đã chốn học để theo bạn đi chơi nên việc học ngày càng yếu dần.Vân đã không làm tròn những bổn phận gì?Nếu em là Vân em sẽ làm gì?

nêu và giải thích các đặc điểm cấu tạo cơ thể giúp ếch thích nghi với đời sống nước và cạn

tìm GTLN, GTNN của biểu thức sau D=

các bạn giải chi tiết các câu cho mình với

mong nhận được sự giúp đỡ từ mn!!!

vẽ cho mình Đao kiếm thần vực anime

Trong bài"Trao duyên"của đoạn 1, Thúy Kiều tâm sự những điều gì với Thúy Vân.Tại sao Thúy Kiều phải kể cho Thúy Vân về mối tình của mình với Kim Trọng cho Thúy Vân nghe. Mục đích để làm gì GIÚP MÌNH VỚI Ạ!!! MÌNH ĐANG GẤP

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến