Как написать программу на Турбо Паскаль, которая будет подсчитывать средний ежедневный доход предприятия, если компоненты переменной v представляют собой ежедневный доход, а тип Zi соответствует дням недели (P, V, S, C, P, S, V)?
Информатика 8 класс Программирование на языке Turbo Pascal Турбо Паскаль программа для подсчета дохода средний доход ежедневный доход дни недели переменная v тип Zi информатика 8 класс Новый
Чтобы написать программу на Турбо Паскаль, которая будет подсчитывать средний ежедневный доход предприятия на основе доходов за каждый день недели, следуйте этим шагам:
Теперь давайте посмотрим на сам код программы:
program AverageIncome; var income: array[1..7] of real; // массив для хранения доходов total, average: real; // переменные для суммы и среднего дохода i: integer; // счетчик begin total := 0; // инициализация суммы доходов // Ввод данных for i := 1 to 7 do begin writeln('Введите доход за день ', i, ':'); readln(income[i]); total := total + income[i]; // добавляем доход к общей сумме end; // Вычисление среднего дохода average := total / 7; // Вывод результата writeln('Средний ежедневный доход составляет: ', average:0:2); end.
В этом коде:
Таким образом, программа будет работать и вычислять средний ежедневный доход на основе введенных данных.