Program temperature; var t: array[1..12] of real; i: integer; tsred: real; begin for i: =1 to 12 do begin write('t[', i: 2,']= '); read (t[i]) end; tsred: =0; for i: =1 to 12 do tsred: =tsred+t[i]; tsred: =tsred/12; writeln( 'среднегодовая температура = ', tsred: 6: 2, ' градусов'); for i: =l to 12 do begin dt[i]: = t[i] - tsred; writeln('dt[',i: 2,']=', dt[i]: 6: 2) end. где здесь пишет ожидался оператор.
И еще не описан массив Dt