var
N,r:integer;
s:real;
begin
writeln('vvedit N');
readln(n);
writeln('vvedit r');
readln(r);
s:=r*n /100;
writeln(s:5:3,' rubli');
end.
var
N,r:integer;
s:real;
begin
writeln('vvedit N');
readln(n);
writeln('vvedit r');
readln(r);
s:=r*n /100;
writeln(s:5:3,' rubli');
end.