Me var s. Var a, s:integer begin s:=0. Program, z1 var a:[1..1000]of i integer. Var m array[1.10 of integer;. Program b7; var i ,k :integer ; a:array [1..7] of integer;. Var s,k: integer; begin s :. Var s k integer begin s 1 for k 3 to 0 do s s*3. Var s k integer begin s 0 for k 5 to 11 do s s+7