Факториал, НОД, Фибоначчи, пинг и пр.

[Excellix]

Работал ранее с Pascal, Basic, даже C в малой степени, однако вот препод задал BAT написать и я завис, читая help из cmd.

Задачи таковы:
Задание 1:
Написать программу, которая выдает факториал числа. Число задается внутри программы.
Задание 2:
Написать программу, которая выдает НОД (Наибольший общий делитель) двух чисел. Числа вводятся как параметры запуска программы.
Задание 3:
Написать программу, которая выдает ряд Фибоначчи. Количество элементов задается пользователем во время работы программы. Ряд записывается в текстовый файл.
Задание 4:
Написать программу, пингующую группу адресов 10.74.ххх.ххх Результаты заносятся в текстовый файл.
Задание 5:
Написать программу, которая создает свою копию, и запускает ее. Та в свою очередь удаляет программу-родителя, создает свою копию и запускает ее. Та в свою очередь удаляет программу-родителя, создает свою копию и … (и т.д.)

[Нур]

Так пиши, чего завис то?

[Slym]

http://freezek.ucoz.ru/blog/2008-11-19-83


Вот классический пример рекурсивного подсчета факториала на командном языке:

@echo off

call :factorial %1
echo %RESULT%
exit

rem Функция для подсчета значения факториала
rem Вход:
rem %1 Число, для которого необходимо подсчитать факториал
rem Выход:
rem %RESULT% Значение факториала
:factorial

if %1 == 0 (
set RESULT=1
exit /b
)

if %1 == 1 (
set RESULT=1
exit /b
)

set /a PARAM=%1 - 1

call :factorial %PARAM%

set /a RESULT=%1 * %RESULT%

exit /b

Пример работы:

> factorial.bat 10
3628800

[Slym]

set n=5
set result=1
:loop
set /a result=result*n
set /a n=n-1
if %n%==0 goto exit
goto loop
:exit
echo %result%