Напишите памятку на тему "Правила тестирования программы" ​

запускаем одновременно часы в 8 минут и 3 минуты -  (8 и 3). после окончания 3-х минут переворачиваем их и продолжаем у нас будет (5 и 3). после окончания  вторых 3-х минут в восьмиминутных часах останется 2 минуты (2 и 3). снова запускаем 3-х минутные чесы вместе с оставшимися 2-х минутными. после окончания  2 минут в восьмиминутныхъ часах в 3-х минутных останется 1 минута (0 и 1). начиная с этой минуты запустив 2 раза трехминутные часы получаем искомые 7 минут. 

program xxx;

    var i, n : integer;

                      s : real;

                    a : array [1..20] of real;

begin

  writeln('введите размерность массива n=');

  readln(n);

  write('введите элементы массива а: ');

  for i: =1 to n do

        readln(a[i]);

  writeln('исходный массив а: ');

  for i: =1 to n do

        writeln(a[i]);

  s: =0;

  for i: =1 to n do

      if a[i] mod 2 = 0 then s: =s+a[i];

  writeln('сумма четных элементов =', s);

  readln

end.

var

n,a: integer;

begin

readln(n);

a: =(n mod 10)*1000+((n mod 100) div 10)*100 + ((n mod 1000) div 100)*10+ n div 1000;

if n> a then

writeln('число ', n, ' больше перевертыша ', a)

else

writeln('перевертыш ', a, ' больше числа ', n);

end.

хвалебный