Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
fedorchen
0 / 0 / 0
Регистрация: 09.03.2016
Сообщений: 16
1

Массивы: определить, какое количество осадков выпало в виде дождя, а какое – в виде снега

13.03.2016, 17:41. Просмотров 923. Ответов 2
Метки нет (Все метки)

Добрый день!Нужна срочно ваша помощь, дорогие знатоки!Информация о количестве осадков, выпадавших в течение меся-ца, и температуре воздуха заданы в виде двух массивов (в месяце принять количество дней равным 30). Определить, какое количество осадков выпало в виде дождя, а какое – в виде снега (дождь, если температура воздуха >0 градусов). Подсчитать среднее количество осадков и среднюю температуру за месяц.
Примечание:значения в массивах должны быть вещественного типа. Заполнение массивов допускается вводить вручную. Считать количество осадков как суммарное значение.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.03.2016, 17:41
Ответы с готовыми решениями:

Определить, какое минимальное и какое максимальное количество цапель могло быть в вольере
Добрый день! Не могу решить школьную задачу по информатике. Текст задачи: "Цапли Петя и Маша...

Определить сколько выпало осадков в виде снега и сколько — в виде дождя
Информация о температуре воздуха и количестве осадков в течение месяца задана в виде двух...

Определить количество осадков, выпавших в виде дождя и в виде снега за эту декаду
Помогите плиз написать программу на массив) Данные о температуре воздуха и количестве осадков за...

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

Количество дней, когда выпало самое большое количество осадков
В массиве хранится информация о количестве осадков,выпавших за каждый день октября. определить...

2
Atomus
13 / 13 / 15
Регистрация: 21.08.2015
Сообщений: 43
13.03.2016, 22:54 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
Const d=30;
 
Var o,t:array [1..d] of real;
    i:integer;
    k_d,k_s,s_o,s_t:real;
 
Begin
 
 For i:=1 to d do //Ввод данных 
 begin
  write('Введите кол-во осадков в ',i,'-ый день: ');
  readln(o[i]);
  write('Введите среднюю температуру в ',i,'-ый день: ');
  readln(t[i]);  
 end;
 
 k_d:=0; //кол-во дождя
 k_s:=0; //кол-во снега
 s_o:=0; //сумма осадков
 s_t:=0; //сумма температур
 
 For i:=1 to d do 
 begin
  if t[i]>0 then k_d:=k_d+o[i] else k_s:=k_s+o[i]; 
  s_o:=s_o+o[i];
  s_t:=s_t+t[i];
 end;
 
 writeln('В виде дождя выпало ',k_d,'мм осадков');
 writeln('В виде снега выпало ',k_s,'мм осадков');
 writeln('Среднее кол-во осадков за месяц ',(s_o/d):6:2,'мм');
 writeln('Средняя температура за месяц ',(s_t/d):6:2,'t');
 
End.
0
fedorchen
0 / 0 / 0
Регистрация: 09.03.2016
Сообщений: 16
14.03.2016, 11:57  [ТС] 3
Большое спасибо за помощь!)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.03.2016, 11:57

Определить, какое из трех множеств содержит наибольшее количество элементов
Нужно составить программу, которая определит какое из трех множеств содержит наибольшее количество...

Какое направление колхоза дало наименьшую прибыль, а какое наибольшую?
колхоз "золотой колос" на протяжении 3 лет развивал следующие направления: 1) овощеводство(х1 руб,...

Какого числа выпало самое большое число осадков
Помогите пожалуйста решить задачу! Известны данные об осадках, выпавших за каждый день месяца....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru