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

Viết phương trình nhập mảng a gồm n phần tử in giá trị lẽ của mảng ra màn hình

Kiều Vũ Linh
5 tháng 5 2023 lúc 5:56

Var array:[1..1000] of integer;

i,n:integer;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

End;

Write('Cac so le la ');

For i:=1 to n do

If a[i] mod 2 <> 0 then write(a[i]:8);

Readln

End.


Các câu hỏi tương tự
Lê Thị Hồng anh
Xem chi tiết
Thảo Nguyễn
Xem chi tiết
Huy Hoàng Phạm
Xem chi tiết
Nguyễn tiên
Xem chi tiết
feng
Xem chi tiết
Ken Kaneki
Xem chi tiết
Lương Ngọc Anh
Xem chi tiết
Nguyễn Quang Kiệt
Xem chi tiết
Danh Nguyễn
Xem chi tiết