Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.70/10: Рейтинг темы: голосов - 10, средняя оценка - 4.70
lpgor
0 / 0 / 1
Регистрация: 23.11.2010
Сообщений: 56
1

Известны данные о количестве осадков, выпавших за каждый месяц года, Найти общее число осадков, выпавших в марте, июне, сентябре и декабре.

21.12.2010, 16:44. Просмотров 1741. Ответов 1
Метки нет (Все метки)

Известны данные о количестве осадков, выпавших за каждый месяц года, Найти общее число осадков, выпавших в марте, июне, сентябре и декабре.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.12.2010, 16:44
Ответы с готовыми решениями:

Вычислить среднее количество осадков и отклонение от среднего для каждого года
Имеются данные о количестве осадков, выпавших в Москве в течение первых 20 лет....

Найти общее число осадков, выпавших в марте, июне, сентябре и декабре.
11.48. Известны данные о количестве осадков, вы*павших за каждый месяц года....

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

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

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

1
AndreyLitvinov
6 / 6 / 3
Регистрация: 03.01.2011
Сообщений: 35
07.01.2011, 09:53 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program ui;
uses crt;
var
A:ARRAY[1..12] OF INTEGER;
s,i:integer;
begin
For i:=1 to 12 do
Begin
writeln('Введите количестве осадков, выпавших за '+inttostr(i)+' месяц года');
readln(A[i]);
end;
S:=A[3]+A[6]+A[9]+A[12];
writeln('общее число осадков, выпавших в марте, июне, сентябре и декабре = '+inttostr(s));
end.
Ну вот както так))) тут множество способов решения, но я выбрал такой)))

Добавлено через 15 секунд
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program ui;
uses crt;
var
A:ARRAY[1..12] OF INTEGER;
s,i:integer;
begin
For i:=1 to 12 do
Begin
writeln('Введите количестве осадков, выпавших за '+inttostr(i)+' месяц года');
readln(A[i]);
end;
S:=A[3]+A[6]+A[9]+A[12];
writeln('общее число осадков, выпавших в марте, июне, сентябре и декабре = '+inttostr(s));
end.
Ну вот както так))) тут множество способов решения, но я выбрал такой)))
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.01.2011, 09:53

Известны данные о количестве осадков, выпавших за каждый день февраля. Какого числа выпало самое большое количество осадков?
Ребята плиз очень прошу, нужно написано в паскале. Тема:Использование...

Дана матрица A[10][12], содержащая данные о количестве выпавших в городе осадков (в мм) за каждый месяц последних 10 лет.
Добрый вечер(утро,день) Помогите решить пустяковую задачу на С++. Я уже искал...

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


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

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

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