Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

Получение алгоритма для обработки величин с реализацией на языке программирование. Работу нужно выполнить в программе pascal ABC.

Дайте пожалуйста готовый, не сложный для того, чтобы выучить алгоритм. Буду очень благодарен.

Ответ оставил Гость

Очень простой алгоритм:

Program Alexey;
{программа запрашивает у пользователя значения ежедневной температуры за 14 дней, и выводит максимальное и минимальное значения и в какие дни температруа достигала этих значений, а также вычисляет среднюю температуру за 2 недели}
uses crt;
const n=14;
var
  i, daymax, daymin:integer;
  t,max,min,sum:real;
begin
  writeln(Введите температуру за каждый день);
  write(День 1-й: T = );
  readln(t);
  max:=t;
  min:=t;
  sum:=t;
  for i:=2 to 14 do //организуем цикл
    begin
      write(День ,i,-й: T = );
      readln(t);
      if t>max then
        begin
          max:=t; // найдено новое максимальное значение
          daymax:=i; // запоминаем соответствующий номер дня
        end;
      if t        begin
          min:=t; // найдено новое минимальное значение
          daymin:=i; // запоминаем соответствующий номер дня
        end;
      sum:=sum+t; //суммируем все значения t
    end;
  writeln();
  writeln(Максимальная температура была на ,daymax,-й день: ,max, градусов);
  writeln(Минимальная температура была на ,daymin,-й день: ,min, градусов);
  writeln(Средняя температура за 14 дней: ,sum/14, градусов);
end.