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
Hồ Thị Ngọc Vy

Viết chương trình nhập vào dãy số gồm n số nguyên in ra dãy số vừa nhập tính tổng các phần tử chẵn trong dãy số tìm số lớn nhất trong dãy số tính tổng các phần tử lẻ trong dãy số tìm số nhỏ nhất trong dãy số

HT.Phong (9A5)
11 tháng 4 2023 lúc 11:29

Uses crt;

var max,min,n,i,m,n: longint;

a: array[1..100] of longint

begin clrscr;

for i:=1 to n do begin

if(a[i] mod 2=0) then m:=m+a[i];

if(a[i] mod 2<>0) then n:=n+a[i];

end;

max:=a[1];

min:=a[1];

for i:=1 to n do begin

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

if(min>a[i]) then min:=a[i];

end;

Writeln('Tong cac phan tu chan: ',m);

Writeln('Tong cac phan tu le: ',n);

Writeln('Phan tu co gia tri lon nhat: ',max);

Writeln('Phan tu co gia tri nho nhat: ',min);

readln;

end.


Các câu hỏi tương tự
Hồ Thị Ngọc Vy
Xem chi tiết
minh dương
Xem chi tiết
Trung Kien
Xem chi tiết
Jeri James
Xem chi tiết
Mẫn Kim Anh
Xem chi tiết
Hiền Nguyễn
Xem chi tiết
Ly Khánh
Xem chi tiết
Nguyễn ánh tuyết
Xem chi tiết
nhannhan
Xem chi tiết