Информатика, написать программу на языке паскаль, найти среднеарифмитическую температуру за неделю

Ответ или решение

var
sum : real; // объявление переменной.
i, t : integer; // объявление переменных целочисленного типа.
begin
writeln (‘Введите температуру за каждый день недели:’); //вывод строки на экран.
for i := 1 to 7 do // начало цикла.
begin
readln(t); // считываем значение температуры за день.
sum := sum + t; // считаем сумму температур.
end;
writeln(‘Средняя арифметическая температура за неделю равна: ‘, round(sum / 7, 2));// ответ.
end.

На нашем сайте представлено множество школьных и студенческих вопросов и ответов на них. Также, вы можете задать свой вопрос или помочь другим учащимся, ответив на существующие вопросы. Для этого пишите ответы в комментариях.

Для того, чтобы найти ответ на ваш вопрос, а он наверняка есть в нашей базе, пользуйтесь формой поиска по сайту!

Оценки
Подсказкино
Добавить комментарий