Multiplicación

Program logicander;

Uses WinCrt;

Var

    Multi, a, b : integer;

Begin

WriteLn ( 'Ingrese el primer valor' );

ReadLn (a);

WriteLn ( 'Ingrese el segundo valor' );

ReadLn (b);

Multi:= a*b;

WriteLn ( 'El resultado es: ', Multi);

end.