program tp1Source2 ; var x , y : integer ; begin x := 3 ; y := 3 * 2 ; write ( x , y , 45 + 2 ) end