Ti metto qualcosa di molto ricercato, che non sarà come il classico esempio che si può fare, C/C++ o Python o Java. Qui usiamo il COBOL, roba vintage 1959 che decisamente ha il suo stile! Lascio indovinare a te cosa fa questo algoritmo (è facilmente intuibile). 

WORKING-STORAGE SECTION.

01 N PIC 99.

01 RIS PIC 9 (15).

O1 i PIC 99.

PROCEDURE DIVISION.

INIT:

ACCEPT N.

IF N <1 GO TO INIT.

MOVE 1 TO i;

MOVE 1 TO RIS.

START:

ADD 1TO i.

COMPUTE RIS=RIS*i.

IF i<=N

GO TO START.

DISPLAY "RIS=" RIS.

STOP RUN.

*................

Esattamente, fa proprio questo!

L'algoritmo di Newton per l'estrazione della radice quadrata

@Interista DOC, prende in input da tastiera un numero e ne calcola il fattoriale, giusto?

La sequenza di Fibonacci si basa su un algoritmo, infatti nella sequenza ogni numero è la somma dei due che lo precedono