Haskell:

import System.Environment (getArgs)

func :: Integer -> [String]
func 0 = []
func n@(x+1) = show n:func x

main = putStrLn . unwords . func . read . head =<< getArgs

«Функция», называемая n + k шаблонами, позволяет следующее: сопоставление с образцом при сложении двух чисел. Он обычно не используется . Более идиоматический способ сделать это - использовать эту версию func:

func n = foldl (flip $ (:) . show) [] [1..n]

или с одним числом в строке:

import System.Environment (getArgs)
import Data.Traversable

main = foldrM (const . print) () . enumFromTo 1 . read . head =<< getArgs

Perl:

$n = $ARGV[0];

while ($n > 0) {
  print "$n ";
  $n = int($n * ($n / ($n+1)));
}

В любом случае вычитание - иллюзия

Мне нравится идея Дилана Беннетта - простая, прагматичная, и она придерживается принципа KISS, который ИМХО является одним из самых важные концепции, которые мы всегда должны учитывать при разработке программного обеспечения. В конце концов, мы пишем код в первую очередь для того, чтобы его поддерживали другие люди, а не для того, чтобы его читали компьютеры. Решение Дилана в старом добром C:

#include <stdio.h>
int main(void) {
        int n;
        for (n = 7; n <= 49; n += 7) {
                printf("%d ", n % 8);
        }
}

В C используется вращающийся блок памяти (заметьте, не то, чем я горжусь ...):

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#define MAX_MAX 10

void rotate_array (int *array, int size) {
  int tmp = array[size - 1];
  memmove(array + 1, array, sizeof(int) * (size - 1));
  array[0] = tmp;
}

int main (int argc, char **argv) {
  int idx, max, tmp_array[MAX_MAX];

  if (argc > 1) {
    max = atoi(argv[1]);
    if (max <= MAX_MAX) {
      /* load the array */
      for (idx = 0; idx < max; ++idx) {
        tmp_array[idx] = idx + 1;
      }
      /* rotate, print, lather, rinse, repeat... */
      for (idx = 0; idx < max; ++idx) {
        rotate_array(tmp_array, max);
        printf("%d ", tmp_array[0]);
      }
      printf("\n");
    }
  }

  return 0;
}

И распространенное решение для lisp, которое рассматривает списки как целые:

(defun foo (max)
  (format t "~{~A~^ ~}~%"
          (maplist (lambda (x) (length x)) (make-list max))))

Преобразование этого в исполняемый файл, вероятно, самая сложная часть, и читатель оставляет ее в качестве упражнения.

Мне нравится рекурсивный

function printCountDown(int x, int y) {
  if ( y != x ) printCountDown(x, y++);
  print y + " ";
}

Вы также можете использовать умножение

function printNto1(int x) {
  for(int y=x*(MAXINT*2+1);y<=(MAXINT*2+1);y++) {
    print (y*(MAXINT*2+1)) + " ";
  }
}

Common Lisp

Обратный отсчет от 7 (с рекурсией или как здесь, используя loop и downto ):

(цикл для n от 7 до 1 do (print n))

В качестве альтернативы, возможно, более забавное решение. Используя комплексные числа, мы просто добавляем i в квадрат несколько раз:

(defun complex-decrement (n)
  "Decrements N by adding i squared."
  (+ n (expt (complex 0 1) 2)))

(loop for n = 7 then (complex-decrement n)
      while (> n 0) do (print n))

#!/usr/bin/env ruby

ARGV[0].to_i.downto(1) do |n|
  print "#{n} "
end
puts ''

// count up until found the number. the previous number counted is
// the decremented value wanted.
void Decrement(int& i)
{
  int theLastOneWas;
  for( int isThisIt = 0; isThisIt < i; ++isThisIt )
  {
    theLastOneWas = isThisIt;
  }
  i = theLastOneWas;
}

void Print(int max)
{
   for( int i = max; i > 0; Decrement(i) )
   {
     printf("%d ", i);
   }
}

Мы играем в гольф?

import sys
for n in reversed(range(int(sys.argv[1]))):print n+1,

x = param;
while (x > 0) {
    print x;
    x = (x + param) mod (param + 1);
}

public class CountUp
{
    public static void main(String[] args)
    {

        int n = Integer.parseInt(args[0]);

        while (n != 0)
        {
            System.out.print(n + " ");
            n = (int)(n + 0xffffffffL);
        }
    }
}

Вот метод, который вы пропустили, методом проб и ошибок:

import java.util.Random;

public class CountDown
{
    public static void main(String[] args)
    {
        Random rand = new Random();

        int currentNum = Integer.parseInt(args[0]);

        while (currentNum != 0)
        {
            System.out.print(currentNum + " ");
            int nextNum = 0;
            while (nextNum + 1 != currentNum) {
               nextNum = rand.nextInt(currentNum);
            }

          currentNum = nextNum;
        }
    }
}

Положите 1-7 в стек. Поп-стек по одному. Печать 7-1. :)

использовать комплимент 2, ведь именно так компьютер работает с отрицательными числами.

int Negate(int i)
{
   i = ~i;  // invert bits
   return i + 1; // and add 1
}

void Print(int max)
{
   for( int i = max; i != 0; i += Negate(1) )
   {
     printf("%d ", i);
   }
}

см. http : //en.wikipedia.org/wiki/2's_complement

c / c ++, немного арифметического переполнения:

void Print(int max)
{
   for( int i = max; i > 0; i += 0xFFFFFFFF )
   {
      printf("%d ", i);
   }
}

Добавить числа в строковый буфер.

String out = "";
for (int i = 0; i < parm; i++)
{
   out = " " + (i+1) + out;
}
System.out.println(out);

использовать ошибку округления:

void Decrement(int& i)
{
    double d = i * i;
    d = d / (((double)i)+0.000001); // d ends up being just smaller than i
    i = (int)d; // conversion back to an int rounds down.
}

void Print(int max)
{
   for( int i = max; i > 0; Decrement(i) )
   {
     printf("%d ", i);
   }
}

Это не сложно. Используйте оператор модуля.

for (int n = 7; n <= 49; n += 7) {
  print n mod 8;
}

Это обман, верно?

#!/usr/bin/env python 
def countdown(n):
    for i in range(n):
        print n
        n = n + (n + ~n)

И просто для развлечения, его рекурсивный брат:

def tune_up(n):
    print n
    if n == 0:
        return
    else:
        return tune_up(n + (n + ~n))

Версия Python:

import sys

items = list(xrange(1, int(sys.argv[1])+1))
for i in xrange(len(items)):
    print items.pop()

Начните с файла, содержащего нисходящие числа от максимально интересующего вас максимума:

7 6 5 4 3 2 1

Затем ... это работает только до 9999

#!/bin/sh
MAX_NUM=9999
if [ ! -e descendingnumbers.txt ]; then
    seq -f%04.0f -s\  $MAX_NUM -1 1 > descendingnumbers.txt
fi
tail descendingnumbers.txt -c $[5 * $1]

Быстрая и грязная версия в Scala:

sealed abstract class Number
case class Elem(num: Number, value: Int) extends Number
case object Nil extends Number

var num: Number = Nil

for (i <- 1 until param)
  num = Elem(num, i)

while (num != null)
  num match {
    case Elem(n, v) => {
      System.out.print(v + " ")
      num = n
    }
    case Nil => {
      System.out.println("")
      num = null
    }
}

Побитовая арифметика

Константа, без сложений, вычитаний, умножений, деления, модули или арифметические отрицания:

#include <iostream>
#include <stdlib.h>
int main( int argc, char **argv ) {
    for ( unsigned int value = atoi( argv[ 1 ] ); value; ) {
        std::cout << value << " ";
        for ( unsigned int place = 1; place; place <<= 1 )
            if ( value & place ) {
                value &= ~place;
                break;
            } else
                value |= place;
    }
    std::cout << std::endl;
}   

Увеличьте целое число со знаком, переданное max_int, а затем "добавьте" его в счетчик ... или это считается незаконным вычитанием ?

    public void print (int i)
    {
        Console.Out.Write("{0} ", i);
        int j = i;
        while (j > 1)
        {
            int k = 1;
            while (k+1 < j)
                k++;
            j = k;
            Console.Out.Write("{0} ", k );
        }
    }

Какая-то неприятная, но она делает свою работу

Альтернативной версией perl может быть:

#!/usr/local/bin/perl
print reverse join(" ",1 .. $ARGV[0]) . "\n";

Замечу, что никто не опубликовал самый глупый из возможных ответов, поэтому я продолжу и поделюсь им:

int main (int argc, char **argv) {
  if ( ( argc < 1 ) || ( atoi(argv[1]) != 7 ) ) {
    printf("Not supported.\n");
  } else {
    printf("7 6 5 4 3 2 1\n");
  }
}

Не ненавидьте меня: понимаете? Я признал, что это глупо. :)

Это считается? Использует только инструкцию добавления ...

int _tmain(int argc, _TCHAR* argv[])
{
   int x = 10;
   __asm mov eax,x;
   __asm mov ebx,0xFFFFFFFF;
   while (x > 0)
   {
      __asm add eax,ebx;
      __asm mov x,eax;
      __asm push eax;
      printf("%d ",x);
      __asm pop eax;
   }
   return 0;
}