Пример алгоритма в котором нарушено свойство конечности

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

var t: integer;

begin

  read(t);

  while t > 6 do

      t: =t-6;

 

  case t of

      0..2: write('green');

      3: write('yellow');

      4..6: write('red');

  end;

end.

паскаль, одномерный массив

 

var a: array [1..6] of integer; i, max: integer;

begin

for i: =1 to 6 do read(a[i]);

max: =a[1];

for i: =1 to 6 do

if a[i]> max then max: =a[i];

writeln(max); readln; end.