Главная » Помощь в учебе » Школьные знания, ответы и решения школьных заданий » Информатика

Введите в компьютер программу Temperature, добавив к ней обработку массива Dt

Нашли ошибку? Напишите нам
0.0/5, Голосов: 0

Учебник по Информатике 9 класс Семакин

Введите в компьютер программу Temperature, добавив к ней обработку массива Dt. Выполните программу, получите результаты. Сравните их с приведенными в параграфе.    
Program Temperature;
var T: array [1..12] of real;
   Dt: array [1..12] of real;
   I: integer; Tsred: real;
BEGIN
{Цикл ввода}
   for I:=1 to 12 do
   begin
      write('T[', I:2, '] = ');
      readln (t[I])
   end;
{Цикл суммирования}
   Tsred:=0;
   for I:=1 to 12 do
   Tsred:= Tsred + T[I];
{Вычисление среднего}
   Tsred:= Tsred/12;
   writeln('Среднегодовая температура = ', Tsred:6:2, ' градусов');
{Отклонение от средней температуры}
   for I:=1 to 12 do
   begin
      Dt[I]:= T[I] - Tsred;
      writeln('Dt[', I:2, '] = ', Dt[I]:6:2);
   end;
END.