Rekurencja ogonowa function iterogon(var i: Integer):Integer; var i2: Integer; begin for i2:=i downto 0 do write(i, ); end; Przykład w Turbo Pascalu i
{"Image DocumentName": "Rekurencja ogonowa Przyk\u0142ad w Turbo Pascalu iteracyjna", "Image ImageDescription": "function iterogon(var i: Integer):Integer; var i2: Integer; begin. for i2:=i downto 0 do write(i, ); end;", "Image XResolution": "37", "Image YResolution": "37", "Image ResolutionUnit": "Pixels/Centimeter", "Image Software": "SlidePlayer", "Image YCbCrPositioning": "Centered"}