Question

Program Temperature;var T: array[1..12] of real;I: integer; Tsred: real;beginfor I:=1 to 12 dobeginwrite('T[', I:2,']= ');read (T[I])end;Tsred:=0;for I:=1 to 12 doTsred:=Tsred+T[I];Tsred:=Tsred/12;writeln( 'Среднегодовая температура = ', Tsred:6:2, ' градусов');for I:=l to 12 dobeginDt[I]:= T[I] - Tsred;writeln('Dt[',I:2,']=', Dt[I]:6:2)end.Где здесь ошибка??? Пишет ожидался оператор.

Answer 1

В конце программы пропущен end;
И еще не описан массив Dt