ПОМОГИТЕ ПОЖАЛУЙСТА С ПРОГРАММИРОВАНИЕМ. НЕ МОГУ РЕШИТЬ ЗАДАЧУ, А В ПОНЕДЕЛЬНИК СДАТЬ НАДО

начало

• Fufic 25.12.10 18:18

  ответ для: NЕжNыЙ яД

  
  не за что.запустить сначала попробуй)не бывает такого, чтобы прога с 1 раза за 2 мин написанна без ошибок.особенно у меня)
• NЕжNыЙ яД 25.12.10 16:41

  ответ для: Fufic

  
  спасибо большое
• Fufic 25.12.10 16:38
  
  /////////////обмен/////////////
  if ( num_stlb < > 0 ) then
  begin
  for i := 0 to M-1 do
  begin
  aa := A[i,num_stlb];
  A[i,num_stlb] := A[i,1];
  A[i,1] := aa;
  end;
  end;
• Fufic 25.12.10 16:37
  
  /////нахождение номера столбика//////////
  for j := N downto 1 do
  begin
  k = true;
  for i := 1 to M do
  if (( A [ i , j ] < 0 )) then
  begin
  k := false;
  break;
  end;
  if (k) then
  begin
  num_stlb := j;
  break;
  end;
  end;
• Fufic 25.12.10 16:37

  ответ для: NЕжNыЙ яД

  
  я по кусочкам отправлю..а то у меня они как-то по левому отправляются
  /////////объявления/////////
  bool k;
  int i,j,num_stlb;
  num_stlb:=0;
  int aa; /*для обмена*/
• NЕжNыЙ яД 25.12.10 09:28

  ответ для: Fufic

  
  мне в паскале надо
• Fufic 24.12.10 16:59
  
  для начала можно написать на каком языке тебе это надо написать...
  а вообще по идеи все просто. насколько я понимю, пролблема то не в том, как делать,это то понято...а в том, как делать на том языке...
  си например будет просто.что-нить типа
  for( j = N-1 ; j > = 0 ; j-- )
  {
  k = 1;
  for ( i = 0 ; i < M ; i++ )
  if (( A [ i , j ] < 0 )) { k=0; break; }
  if (k) { num_stlb = j; break }
  }
  соответственно первый цикл по столбцам, вложенный по строкам, поэтому идти по матрице будем по сттолбцам.
  если хоть 1 отрицательный элемент, то наам это не подходит-выходим
  если хоть 1 полжительный столбец-мы добились уели-выходим
  ну и потом просто их меняем
  надеюсь, у вас все-таки си..его вроде как самым первым проходят