Как записать рассказ в блок-схему? как записать рассказ в блок схему

Блок-схема — графическое представление алгоритма. Она состоит из функциональных блоков, которые выполняют различные назначения (ввод/вывод, начало/конец, вызов функции и т.д.).

В задании не сказано, откуда берутся исходные данные, поэтому будем вводить их с клавиатуры. Сначала ведем общее количество данных (не факт, что данные за месяц снимались строго ежедневно), а затем сами данные. Это позволит заодно осуществить контроль ввода.

var
  n,s,t,i:integer;
begin
  Write('Укажите количество данных: ');
  Read(n);
  Writeln('Теперь вводите данные');
  s:=0;
  for i:=1 to n do
    begin
    Read(t);
    s:=s+t
    end;
  Writeln('Средняя температура за месяц составила ',s/n:0:1)
end.

Пример решения

Укажите количество данных: 11
Теперь вводите данные
27 29 26 31 24 23 27 30 31 28 25
Средняя температура за месяц составила 27.4

Объяснение:

Const n=12;

Var T:array[1..n] of real;

   i,imax:integer;

   sr:real;

Begin  

   writeln('Введите среднии температуры за каждый месяц года');

   sr:=0;

   For i:=1 to n do

   Begin

     read(T[i]);

     sr:=sr+T[i];

   End;

   sr:=sr/n;

   writeln('Среднегодовая температура = ',sr:0:2);

   imax:=1;

   For i:=2 to n do

    if T[i]>T[imax] then imax:=i;

   writeln('Самая высокая среднемесячная температура была в месяце');

   writeln('под номером ',imax,' и составила ',T[imax]:0:2);

   readln;

End.

Вроде так.