program t27; var g : integer ; procedure work ; var v1 : integer ; v2 : integer ; v3 : integer ; v4 : integer ; v5 : integer ; begin v1 := 10 ; v2 := 20 ; v3 := 30 ; v4 := 40 ; v5 := 50 ; g := v1 + v2 + v3 + v4 + v5 ; writeln (v1, ' ', v2, ' ', v3, ' ', v4, ' ', v5, ' ', g) end ; begin work ; writeln (g) end.