Đa phương tiện

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

Cho dãy số A gồm N phần tử không sắp xếp theo thứ tự. Viết chương trình tính tổng các phẩn tử của dãy số, tìm phần tử có giá trị lớn nhất trong mảng, phẩn tử có giá trị nhỏ nhất trong mảng và vị trí xuất hiện của nó. Sắp xếp dãy số lại theo thứ tự tăng dần. Biết 0<N≤50.

Nguyễn Lê Phước Thịnh
30 tháng 10 2021 lúc 0:01

uses crt;

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

i,n,t,max,min:int64;

begin

clrscr;

readln(n);

for i:=1 to n do 

  readln(a[i]);

max:=a[1];

min:=a[1];

t:=0;

for i:=1 to n do 

begin

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

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

t:=t+a[i];

end;

writeln('Tong la: ',t);

writeln('So lon nhat la: ',max);

write('Vi tri la: ');

for i:=1 to n do

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

writeln;

writeln('So nho nhat la: ',min);

write('Vi tri la: ');

for i:=1 to n do 

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

readln;

end.


Các câu hỏi tương tự
Trần Nhật Phong
Xem chi tiết
Trần Nhật Phong
Xem chi tiết
Vu Hoang
Xem chi tiết
Thangzz
Xem chi tiết
Nguyễn thị ngọc hoan
Xem chi tiết
Tạ Nguyễn Huyền Giang
Xem chi tiết
Phương Minh
Xem chi tiết
Đinh Ngọc Lan
Xem chi tiết
Đinh Thuận
Xem chi tiết