Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình GTNN và cho biết GTNN nằm ở vị trí nào của mảng . Mai mình nộp nên mọi người làm nh

0 bình luận về “Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình GTNN và cho biết GTNN nằm ở vị trí nào của mảng . Mai mình nộp nên mọi người làm nh”

1. @SANGOFFICIAL

   program tim_max_min ;

   var i,n,max,min:integer;

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

   begin

   read(n);

   for i:=1 to n do

   read(a[i])

   max:=a[1];

   for i:=1 to n do

    if a[i]>max then

   end.

   Bình luận

2. var max,i,n:longint;

   a:array[0..100000]of longint;

   begin

   read(n);

   for i:=1 to n do

       read(a[i]);

   max:=a[1];

   for i:=1 to n do

      if a[i]>max then

           begin

                   max:=a[i];

                    vt:=i;

          end;

   write(max,’ ‘,vt);

   end.

       

   Bình luận