сервис вопросов и ответовсоставить программу вычисления средней температуры за месяц
10-11 класс|
|
Tomskui98
16 нояб. 2016 г., 8:30:54 (7 лет назад)
Vikusenokkusya
16 нояб. 2016 г., 10:52:19 (7 лет назад)
Program z;
uses crt;
var
s,x,i:real;
begin
clrsc;
x:=0
for i:=1 to 30 do begin
writeln('введите температуру');
readln(x);
sr:=sr+x;
end;
y:=sr/30;
writeln('ср темп равна',y);
readln;
end.
Venera1626
16 нояб. 2016 г., 13:44:24 (7 лет назад)
const
n = 30; //n - количество дней в месяце
var
t: array [1..n] of real;
i: integer;
s: real;
begin
s:= 0;
for i:= 1 to n do
begin
writeln('Введите температуру ', i, ' дня');
readln(t[i]);
s:= s + t[i];
end;
writeln('Средняя температура за месяц: ', s / n);
end.
Ответить
Другие вопросы из категории
В процессе преобразования растрового графического изображения количество цветов уменьшилось с 65 536 до 16. Во сколько раз уменьшился его
информационный объём?
Люди, хеелп Сортировка массива (метод пузырька; метод простого выбора). В массиве хранится информация о стоимости каждой из 50 книг. Вывести на экран
стоимости 10 самых дешевых книг. паскаль.
Читайте также
Помогите пожалуйста!! ) составить программу в "Pascal abc"!!)
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
1)составьте программу вычисления суммы чисел в диапазоне от 45 до 115 45+....+115
2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N
------------------------ОПЕРАТОР WHILE
Составьте программу вычисления значение Sin, Cos и Tg углов от 0 до 45 градусов с шагом 1 градус (с использованием оператора цикла FOR). Для вы-вода
результата введите ограничение на количество знаков после запятой. Примечание. В Паскале используются стандартные функции: SIN(X) - синус Х (аргумент задается в радианах); COS(X) - косинус Х (аргумент задается в радианах); Для подсчета угла в радианах используйте формулу: угол в радианах = (угол в градусах)*/180. Результат представьте в виде: Программа вычисления значений тригонометрических функций x° Sin(x) Cos(x) Tg(x) 1 2 3 .. 45
Написать программу в паскале по вычислению средний температуры за неделю.Исходные данные вводятся с клавиатуры: Понедельник 12 градусов Вторник 10 Среда
16 Четверг 18 Пятница 17 Суббота 16 Воскресенье 14
Вы находитесь на странице вопроса "составить программу вычисления средней температуры за месяц", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.