program mn;
uses crt;
var n,znam:integer;
function pr(var a:integer):integer;
var i,s:integer;
begin
s:=0;
for i:=1 to a do
s:=s+znam;
pr:=s;
end;
BEGIN
ClrScr;
Write('n:');
readln(n);
Write('Znamenatel:');
readln(znam);
writeln(pr(n));
readln;
END.