Дан условный оператор: if (a<16) then y:=a else y:=a+9. Что является условием

условием является a<16

Объяснение:

условие располагается между if и then

Дискретность. Процесс решения задачи должен быть разбит на последовательность отдельных шагов-команд, которые выполняются одна за другой. Только после завершения одной команды начинается выполнение следующей.

Понятность. Алгоритм должен содержать только те команды, которые известны исполнителю.

Детерминированность. Каждый шаг и переход от шага к шагу должны быть точно определены, чтобы его мог выполнить любой другой человек или механическое устройство. У исполнителя нет возможности принимать самостоятельное решение (алгоритм исполняется формально).

Конечность. Обычно предполагают, что алгоритм заканчивает работу за конечное число шагов. Результат работы алгоритма также должен быть получен за конечное время. Можно расширить понятие алгоритма до понятия процесса, который по различным каналам получает данные, выводит данные и потенциально может не заканчивать свою работу.

Массовость. Алгоритм должен решать не одну частную задачу, а класс задач. Не имеет смысла строить алгоритм нахождения наибольшего общего делителя только для чисел 10 и 15.

Объяснение:

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('Количество строк/столбцов в матрице:');
  Writeln('*** Исходная матрица ***');
  var a:=MatrRandom(n,n,1,50);
  a.Println(3); Writeln(3*a.ColCount*'-');
  // начало расчетов
  var s:=0;
  for var i:=0 to n-1 do s+=a[i,n-i-1];
  Writeln('1: S=',s);
  Write('2: Суммы построчно: '); a.Rows.Select(row->row.Sum).PrintLn;
  Write('3: Произведение элементов: ');
  a.ElementsByRow.Aggregate(BigInteger(1),(p,q)->p*q).PrintLn;
  var p:BigInteger:=1;
  for var i:=0 to n-1 do p*=a[i,i];
  Writeln('4: П=',p);
end.