• [Delphi] - 99
    Заданы матрица порядка n и число k. разделить элементы k-й строки на диагональный элемент, расположенный в этой строке.

Ответы 6

  • Ваша программа не запускается в Делфи ---------------------------Error---------------------------Runtime error 105 at 00403FE0---------------------------ОК ---------------------------
  • Добавьте в самом начале {$APPTYPE CONSOLE}
    • Автор:

      thelma
    • 5 лет назад
    • 0
  • А можете сделать в графическом виде, т.е форму используя?
  • Можете сделать в графическом виде, с формой?
  • Могу, но сейчас нет возможности этим заниматься.
    • Автор:

      drakeemkm
    • 5 лет назад
    • 0
  • {$APPTYPE CONSOLE}Var   Mass:array[1..10000,1..10000] of real;   n,k,i,j:integer;BeginRandomize;Write('n = ');ReadLn(n);For i:= 1 to n do    Begin    For j:= 1 to n do        Begin        Mass[i,j]:=random*21-10;        Write(Mass[i,j]:5:2,' ')        End;    WriteLn    End;Write('k = ');ReadLn(k);For j:= 1 to n do    Mass[k,j]:=Mass[k,j]/Mass[k,k];For i:= 1 to n do    Begin    For j:= 1 to n do        Write(Mass[i,j]:5:2,' ');    WriteLn    End;ReadLnEnd.
    • Автор:

      buffie
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years