Ôn tập cuối năm

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Thế anh lã

Câu 2 Viết chương trình nhập một mảng số nguyên A có độ dài 50 phần tử với số lượng phần tử được nhập từ bàn phím. Thực hiện in ra màn hình các số lẻ có trong mảng.

 

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

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

i:integer;

s:longint;

Begin

For i:=1 to 50 do

Begin

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

If a[i] mod 2 <> 0 then

s:=s+a[i];

End;

Write('Tong cac so le la: ',s);

Readln

End.


Các câu hỏi tương tự
Thánh Tiền
Xem chi tiết
Vinh Bùi
Xem chi tiết
Quản Gia Lynh
Xem chi tiết
An An Nguyễn
Xem chi tiết
Vãn Ninh 4.0
Xem chi tiết
Ngọc Ty
Xem chi tiết
Bao Duong
Xem chi tiết
Vinh Bùi
Xem chi tiết
Nguyễn Ánh Mai
Xem chi tiết