Bài 9. Làm việc với dãy số

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

Nhập vảo mảng gồm N số nguyên:

a) In ra màn hình các số chẵn có trong mảng.

b) Tính tổng các số lẻ có trong mảng.

c) Tìm giá trị lớn nhất và giá trị nhỏ nhất có trong mảng

Giúp mình vs mai mình kt rồi !

 

Minh Lệ
1 tháng 5 2022 lúc 19:08

Program HOC24;

var min,max,n,i: integer;

t: longint;

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

begin

write('Nhap N: '); readln(n);

for i:=1 to n do

begin

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

end;

write('Cac so chan trong mang la: ');

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

writeln;

t:=0;

for i:=1 to n do if a[i] mod 2=1 then t:=t+a[i];

writeln('Tong cac so le la: ',t);

min:=a[1]; max:=a[1];

for i:=1 to n do

begin

if a[i]>max then max:=a[i];

if a[i] <max then max:=a[i];

end;

writeln('Gia tri lon nhat la: ',max);

write('Gia tri nho nhat la:' ,min);

readln

end.


Các câu hỏi tương tự
Ánh sao
Xem chi tiết
Hồ Thị Ngọc Vy
Xem chi tiết
Thị Na Trần
Xem chi tiết
Mẫn Kim Anh
Xem chi tiết
Phan Hùng Anh
Xem chi tiết
Trung Kien
Xem chi tiết
Tuoi tom May
Xem chi tiết
anhle
Xem chi tiết
Hồ Thị Ngọc Vy
Xem chi tiết