Найдите произведение натуральных...

Тема в разделе "Информатика", создана пользователем Antek, 2 апр 2010.

  1. Antek

    Antek New Member

    Найдите произведение натуральных чисел от 1 до n ( с помощью алгоритма )
     
    Antek, 2 апр 2010
    #1
  2. DarkBMW

    DarkBMW New Member

    var prod,i,N:int;
    begin
       readln(N);
       prod:=1;
       for i:=1 to N do
          prod:=prod*i;
       writeln(prod)
    end.
     
    DarkBMW, 2 апр 2010
    #2

Поделиться этой страницей

Наша группа