program p1N1; {$APPTYPE CONSOLE} var n:integer; v,a:real; begin writeln('vvedit kilkist varenukiv ta vagu 1 varenuka(gr)'); readln(n,v); a:=v*n; writeln('vaga vsih varenukiv ',a:5:2,'(kg)'); readln; end.