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