read (x); read (y); z := x*y*3; write (z)