This macro should do it:
Sub deletePix()
Dim osld As Slide
'insert the real name instead of Picture 2
Const PicName As String = "Picture 2"
On Error Resume Next
For Each osld In ActivePresentation.Slides
osld.Shapes(PicName).Delete
Next osld
End Sub
How to use macros