напишите программку которая вычисляет среднюю за неделю температуру воздуха.Начальные данные

Напишите программку которая вычисляет среднюю за неделю температуру воздуха.Начальные данные вводятся с клавиатуры Средняя температура за неделю 14.71

Задать свой вопрос
1 ответ

Описание:

введем массив из температур - w,

будем вводить значения температур с поддержкою цикла и сходу обретать сумму s, потом найдем среднее значение sr_t и выведем его значение, отведя для этого 5 знакомест, из которых 2 после запятой - sr_t:5:2.

program sr_temp;

var s,i:integer; sr_t:real;

     w: array [1..7] of integer;

begin

 s:=0;

  for i:=1 to 7 do

    begin

       readln(w[i]); s:=s+w[i];

    end;

 sr_t:=s/7;

 writeln('Средняя температура за неделю - ',sr_t:5:2);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт