FUNCTION MOLTIPLICAZIONE(N1, N2)
VAR
I, RISULTATO
BEGIN
RISULTATO := 0
I := 0
WHILE I < N2
RISULTATO := RISULTATO + 1
I := I + 1 ENDWHILE
MOLTIPLICAZIONE := RISULTATO
END

ALGORITMO MOLT
VAR
NUMERO1, NUMERO2, RISULTATO
BEGIN
READ NUMERO1
READ NUMERO2
RISULTATO := MOLTIPLICAZIONE(NUMERO1, NUMERO2)
PRINT RISULTATO
END