Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Lê Xuân Long

nhập từ bàn phím 1 mảng 1 chiều a có tối đa 50 phần tử, sau đó in lên màn hình:
a) các phần tử là số lẻ  
b)các phần tử ở vị trí chẵn 
c)là số lẻ ở vị trí chẵn

Minh Lệ
17 tháng 3 2021 lúc 11:08

Program HOC24;

Program HOC24;

var a: array[1..50] of integer;

i,n: integer;

begin

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

for i:=1 to n do 

begin

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

end;

for i:=1 to n do if a[i] mod 2=1 then write(a[i],' '); writeln;

for i:=1 to n do if a[i] mod 2=0 then write(a[i],' '); writeln;

for i:=1 to n do if (a[i] mod 2=1) and (i mod 2=0) then write(a[i],' ');

readln

end.


Các câu hỏi tương tự
30. Hoàng Nhơn
Xem chi tiết
TBNT
Xem chi tiết
ngoc tran
Xem chi tiết
Nguyễn Thị Oanh
Xem chi tiết
Nguyên GM Nguyễn
Xem chi tiết
Lê Tuấn Lâm
Xem chi tiết
ngoc tran
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết