1. 

   ШеПоТ New Member

   поменять местами k-й и l-й столбцы данного массива А(m,n)нужна программа на паскале. помогите пожалуйста)

    

   ШеПоТ, 2 мар 2010

   #1
2. 

   Esper@nza New Member

   constnMax = 10;
   var  a:array [1..nMax] of integer; 
   buf :integer;
   begin 
   readln(k, l); 
   for i := 1 to m do   begin   
   buf := a[i, k];   
   a[i, k] := a[i, l];   
   a[i, l] := buf; 
    end;  
   end.

    

   Esper@nza, 2 мар 2010

   #2

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

Пароль:

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

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