Месяц Среднее T [ 1:12 ]T [1]T [2]T [3]T [4]T [5]T [6]T [7]T [8]T [9]T [10]T [11]T [12] Температура ,56 начало конец i := 1, 12 вывод T [ i ] = ввод T [ i ] PROGRAM VAR READLN : INTEGER T () FORTO Temperature ; T [ i ] ; END. :=:= i 11212DO BEGIN WRITE() T [, i : 2, ] = : ARRAY [ ] OFREAL i ; BEGIN END ; ; ; : Tsred ; REAL :=:= 0 ; Tsred FORTO :=:= i 11212DO :=:= ; TsredTsred + T [ i ] :=:= TsredTsred / 12 ; WRITELN( ) Среднегодовая температура =, Tsred : 6 : 2, градусов Tsred := 0 i := 1, 12 Tsred := Tsred + T [i] Tsred := Tsred / 12 вывод Tsred