Составьте программку выводящую на экран все числа от - 10 до

// Избирайте, здесь три цикла, while, repeat и for

//------------------------

program LoopWhile;

begin

 var (a, b) := (-10, 10);

 while a lt;= b do

 begin

   Println(a, Абс(a));

   a += 1

 end;

end.

//------------------------

program LoopRepeat;

begin

 var (a, b) := (-10, 10);

 repeat

   Println(a, Абс(a));

   a += 1

 until a gt; b;

end.

//------------------------

program LoopFor;

begin

 var (a, b) := (-10, 10);

 for var i := a to b do

   Println(i, Абс(i));

end.