Напишите два варианта программы, вычисляющей среднюю за неделю температуру воздуха, организовав: обработку последовательности на Паскаль

§ 1.4. Обработка одномерных массивов целых чисел на языке Паскаль Гдз по информатике 9 класс по учебнику Босова. Базовый уровень. Обновленные ФГОС 2021 год.

7. Напишите два варианта программы, вычисляющей среднюю за неделю температуру воздуха, организовав:

а) обработку последовательности;

б) обработку массива. Исходные данные вводятся с клавиатуры.

Пример входных данных
Введите температуру
Понедельник>>12
Вторник>>10
Среда>>16
Четверг>>18
Пятница>>17
Суббота>>16
Воскресенье>>14

Пример выходных данных
Средняя температура за неделю>> 14.71

Ответ

а) Программа с обработкой последовательности в Паскале:

program AverageTemperature;

var
temp: Integer;
sum: Integer;
count: Integer;
average: Real;

begin
sum := 0;
count := 0;

writeln('Введите температуру:');
writeln('Понедельник');
readln(temp);
sum := sum + temp;
count := count + 1;

writeln('Вторник');
readln(temp);
sum := sum + temp;
count := count + 1;

writeln('Среда');
readln(temp);
sum := sum + temp;
count := count + 1;

writeln('Четверг');
readln(temp);
sum := sum + temp;
count := count + 1;

writeln('Пятница');
readln(temp);
sum := sum + temp;
count := count + 1;

writeln('Суббота');
readln(temp);
sum := sum + temp;
count := count + 1;

writeln('Воскресенье');
readln(temp);
sum := sum + temp;
count := count + 1;

average := sum / count;

writeln('Средняя температура за неделю: ', average:0:2);
end.

б) Программа с обработкой массива в Паскале:

program AverageTemperature;

var
temperatures: array[1..7] of Integer;
i: Integer;
sum: Integer;
average: Real;

begin
sum := 0;

writeln('Введите температуру:');
for i := 1 to 7 do
begin
write(DayOfWeek(i - 1) + '>> ');
readln(temperatures[i]);
sum := sum + temperatures[i];
end;

average := sum / 7;

writeln('Средняя температура за неделю: ', average:0:2);
end.

Оба варианта программы выполняют одну и ту же задачу — считывают температуру для каждого дня недели и вычисляют среднюю температуру за неделю. Однако первый вариант работает с последовательностью переменных, а второй с массивом. Оба варианта дают одинаковый результат.