Inscrivez-vous ou connectez-vous pour rejoindre votre communauté professionnelle.
procedure multiple ()
variables a,b,s : integer;
write ( " enter the first number");
read (a);
write ("enter the second number");
read (b);
s=a*b
Write ("s=",s);
End
