Что будет выведено на экран в результате работы программы? нарисуйте дерево рекурсивных вызовов.
program n2;  
uses crt;
procedure rec(i: integer); begin
writeln(i);
if i> 1 then rec(i-1); end;
begin
  clrscr;  
  rec(5);
end.