Multiplicación mediante sumas sucesivas

Programa en Pseudocódigo para realizar la multiplicación de dos números enteros positivos mediante sumas sucesivas.

Proceso multiplicacion_con_sumas
    Repetir
        leer a,b
    Hasta Que a>0 & a=trunc(a) &  b>0 & b=trunc(b)
    s<-0
    Para i<-1 Hasta b Con Paso 1 Hacer
        s<-s+a
    FinPara
    Escribir s
FinProceso