напишіть програму для створення проекту, у якому вводяться значення середніх денних температур за кожний день тижня і визначається їх сума та середнє арифметичне; використайте одновимірний масив (список). Мовою паскаль
Ось приклад коду на мові Pascal, який створює масив для зберігання середніх денних температур за кожен день тижня, заповнює його користувацькими введеними значеннями, обчислює суму та середнє арифметичне температур та виводить результати на екран:
less
Copy code
program WeeklyTemperatures;
const
WEEK_DAYS = 7; // кількість днів у тижні
var
temperatures: array[1..WEEK_DAYS] of Real; // масив для зберігання температур
i: Integer; // лічильник циклу
sum, avg: Real; // змінні для зберігання суми та середнього арифметичного
begin
// заповнення масиву температур користувацькими значеннями
for i := 1 to WEEK_DAYS do
begin
writeln('Введіть середню температуру за день ', i, ': ');
readln(temperatures[i]);
end;
// обчислення суми та середнього арифметичного температур
Answers & Comments
Відповідь:
Ось приклад коду на мові Pascal, який створює масив для зберігання середніх денних температур за кожен день тижня, заповнює його користувацькими введеними значеннями, обчислює суму та середнє арифметичне температур та виводить результати на екран:
less
Copy code
program WeeklyTemperatures;
const
WEEK_DAYS = 7; // кількість днів у тижні
var
temperatures: array[1..WEEK_DAYS] of Real; // масив для зберігання температур
i: Integer; // лічильник циклу
sum, avg: Real; // змінні для зберігання суми та середнього арифметичного
begin
// заповнення масиву температур користувацькими значеннями
for i := 1 to WEEK_DAYS do
begin
writeln('Введіть середню температуру за день ', i, ': ');
readln(temperatures[i]);
end;
// обчислення суми та середнього арифметичного температур
sum := 0;
for i := 1 to WEEK_DAYS do
begin
sum := sum + temperatures[i];
end;
avg := sum / WEEK_DAYS;
// виведення результатів на екран
writeln('Сума температур: ', sum:0:2);
writeln('Середнє арифметичне температур: ', avg:0:2);
readln;
end.
Пояснення: