Матрицы. Возможные ошибки: различия между версиями

Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
(Новая: == Ссылки == Алгоритмы для начинающих)
 
 
(не показана 1 промежуточная версия этого же участника)
Строка 1: Строка 1:
<source lang="Delphi">var
  a: Matrix;
  sums: array [1..SzM] of integer;
begin
  var m := 4;
  var n := 5;
  FillMatrixByRandom(a,m,n);
   
  writeln('Исходная матрица: ');
  PrintMatrix(a,m,n);
 
  var sum := 0;
  for var i:=1 to m do
    sum += a[1,i];    // здесь перепутаны строка и столбец: переменная i является
                      // номером столбца и меняеся от 1 до m, что неправильно
end.</source>
== Ссылки ==
== Ссылки ==
[[Алгоритмы_для_начинающих_на_примерах|Алгоритмы для начинающих]]
*[[Программы для начинающих]]
*[http://pascalabc.net/ru/programmyi-i-algoritmyi-dlya-nachinayuschih.html Сайт PascalABC.NET: Программы и алгоритмы для начинающих]

Текущая версия от 15:51, 19 января 2010

var 
  a: Matrix;
  sums: array [1..SzM] of integer;

begin
  var m := 4;
  var n := 5;
  FillMatrixByRandom(a,m,n);
    
  writeln('Исходная матрица: ');
  PrintMatrix(a,m,n);
  
  var sum := 0;
  for var i:=1 to m do
    sum += a[1,i];     // здесь перепутаны строка и столбец: переменная i является 
                       // номером столбца и меняеся от 1 до m, что неправильно
end.

Ссылки