1. 

   labas New Member

   дан одномерный массив.найти самый минимальный элемент массива

    

   labas, 20 янв 2010

   #1
2. 

   ShelВy New Member

   Если массив состоит из 10 элементов то код программы:
    
   const
    n=10; 
   var
     a:array[1..n] of integer;
     i,min:integer; 
   begin
   for i:=1 to n do read(a);     {вводишь заданный массив}
   min:=32767;
   for i:=1 to n do
    If a<min then min:=a;
   write(min);
   end; 
   

    

   ShelВy, 20 янв 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня