Tạo mảng số nguyên A gồm n phân tử. Tìm ra các phần tử chẵn Đếm số phần tử chẵn trong mảng. Huhu giúp mk vs ạ mk đg ktra. Thanks mn nhìu

khanhyk01

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 24 xem

1 trả lời

Thích Trả lời

Susabi

uses crt;

var a:array[1..1000000] of longint;

i,n,d:longint;

begin

write('n=');readln(n);

for i:=1 to n do

begin

write('a[',i,']=');readln(a[i]);

end;

d:=0;

write('Cac phan tu chan: ');

for i:=1 to n do

if a[i] mod 2=0 then

begin

write(a[i],' ');

d:=d+1;

end;

writeln;

write('Co ',d,' phan tu la so chan');

readln;

end.

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

tcao76278

Program NN;
Uses crt;
Var A: array[1..10000] of longint;
n,i,d: longint;
Begin
Clrscr;
Write('Nhap n: '); Readln(n);
d:=0;
For i:=1 to n do
Begin
Read(A[i]);
If A[i] mod 2 = 0 then inc(d);
End;
Writeln(d);
For i:=1 to n do
If A[i] mod 2 = 0 then Write(A[i],' ');
Readln
End.

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

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

Với điều 5 của Luật Lao động mình cần cam kết cái gì

Tính diện tích hình thoi biết Â=30 độ, chiều cao BH kẻ từ B xuống cạnh AD dài 3,1 cm

giải thích rõ hộ mk nhé hứa vote năm * + cảm ơn

A = 5.2^3 - 18.3 .................

Câu 3 trắc nghiệm và câu hai tự luận(bài 2 lớp 7a,7b...)

Xác định chủ ngữ , vị ngữ câu sau : Lá trên cành mãi xanh còn em thì mãi yêu anh Vũ Minh Quân

1.Thức ăn nhân tạo nuôi thủy sản có gì giống và khác so với thức ăn nhân tạo cho vật nuôi? 2. Tại sao thức ăn hỗn hợp cho thủy sản chỉ có dạng viên và phải bổ sung chất kết dính? 3. Làm thế nào để có nhiều thức ăn nhân tạo cho thủy sản vừa bảo vệ môi trường vừa giảm chi phí thức ăn? giúp em với ạ,chiều nay em học rồi, mà bài này lấy điểm nữa :<<

Giúp mình câu 5,6 vs ạ Mình cảm ơn

Xác định chủ ngữ , vị ngữ câu sau : Lá trên cành mãi xanh còn em thì mãi yêu anh Vũ Minh Quân

Lập dàn ý bài ngẫu nhiên viết nhân buổi mới về quê

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