ПОМОГИТЕ ПОЖАЛУЙСТА, СРОЧНО!!!
Нужно написать программу на языке Паскаль, которая в конце выведет среднемесячную температуру.
Описание задачи
Очень часто приходится работать с большими объёмами данных, а также с различными форматами данных. В данной задаче мы будем работать с массивами, и будем вычислять среднемесячную температуру за период с января по декабрь.
Алгоритм решения
- Создаём массив, в котором будем хранить значения температуры за каждый из 12 месяцев.
- Используем цикл для заполнения массива значениями температуры за каждый месяц.
- Вычисляем среднюю температуру, складывая все значения массива и деля их на 12.
- Выводим среднемесячную температуру на экран.
Код программы
program average_temperature;
var
temperature: array [1..12] of real; // массив для хранения температуры
i: integer; // переменная для использования в цикле
sum, avg: real; // переменные для суммирования температур и вычисления среднего значения
begin
// заполнение массива значениями температуры за каждый месяц
for i := 1 to 12 do
begin
writeln('Введите температуру за ', i, '-й месяц: ');
readln(temperature[i]);
end;
// вычисление средней температуры
sum := 0; // обнуляем сумму перед расчётом
for i := 1 to 12 do
begin
sum := sum + temperature[i];
end;
avg := sum / 12;
// вывод результата
writeln('Среднемесячная температура: ', avg:2:1);
readln;
end.
Заключение
Программа, написанная на языке Паскаль, позволяет вычислить среднемесячную температуру за год на основе введенных пользователем значений температуры за каждый месяц. Она будет полезна в тех случаях, когда требуется быстро и точно вычислить средний показатель по имеющимся данным.