сервис вопросов и ответовЗадание. Для проведения эксперимента выбраны 10 районов Московской области.
5-9 класс|
|
n>Известны засеваемые площади и средняя урожайность по району.
Прикрепленные изображения
Nikar7uurg
14 дек. 2013 г., 20:28:38 (10 лет назад)
Lol0102
14 дек. 2013 г., 22:56:09 (10 лет назад)
Program Mcastiel;
uses crt;
const n = 10;
var
rayon:array [1..n] of string;
pl:array [1..n] of real;
su:array [1..n] of real;
ur:array [1..n] of real;
i,maxnum,minnum:integer;
max,min,sum,area: real;
begin
rayon[1]:='Дмитровский'; pl[1]:=93; su[1]:=12;
rayon[2]:='Домодевский'; pl[2]:=65; su[2]:=17;
rayon[3]:='Клинский'; pl[3]:=98; su[3]:=15;
rayon[4]:='Лыткаринский'; pl[4]:=64; su[4]:=17;
rayon[5]:='Люберецкий'; pl[5]:=102; su[5]:=17;
rayon[6]:='Марьинский'; pl[6]:=155; su[6]:=14;
rayon[7]:='Мытищинский'; pl[7]:=207; su[7]:=16;
rayon[8]:='Орловский'; pl[8]:=307; su[8]:=19;
rayon[9]:='Реутовский'; pl[9]:=134; su[9]:=21;
rayon[10]:='Семеновским'; pl[10]:=45; su[10]:=14;
ur[1]:=pl[1]*su[1];
max:=su[1];
min:=su[1];
sum:=ur[1];
maxnum:=1;
minnum:=1;
area:=pl[1];
for i:=2 to n do
begin
ur[i]:=pl[i]*su[i];
sum:=sum+ur[i];
area:=area+pl[i];
if max<su[i] then
begin
max:=su[i];
maxnum:=i;
end;
if min>su[i] then
begin
min:=su[i];
minnum:=i;
end;
end;
writeln();writeln();
writeln('Внимание! Alphaeus объявляет результаты экспреримента!');
writeln('В целом по области собрано ',sum,' тонн');
writeln('Средняя урожайность по области: ',sum/area,' т/га');
writeln();
writeln('Самая maxвысокая урожайность в ',rayon[maxnum],' районе: ', su[maxnum],' т/га');
writeln('Так держать!!!'); writeln();
writeln('Самая minнизкая урожайность в ',rayon[minnum],' районе: ', su[minnum],' т/га');
writeln('Позор!!!');
end.
Ответить
Другие вопросы из категории
Файл объемом 450 байт был скачан стандартным модулем загрузки браузера за 10 секунд. Скорость скачавания равна:
а) 4,5 байт/с
б)45 бит/с
в) 45 байт/с
г)450 бит/с
Арифметические операции в двоичной системе счисления нужно произвести вычитание 1) 100111001-110110
2) 1101111011,01-101000010,0111
50 баллов /50 балів
Задача С Вогняне дихання
Одного разу Сеньйор розповів Дракону, що минулого вечора він К разів бачив над лісом дим. Як ви знаєте, диму без вогню не буває. Дракон пригадав, що вчора він гуляв лісом та час від часу заради розваги дмухав вогнем, як це інколи роблять всі поважні дракони. Всього Дракон дмухав вогнем у N точках. Сеньйору раптом стало цікаво - наскільки далеко він може побачити драконів дим?
Нехай відстань, на яку видно дим - К. Тоді кожного разу, коли Дракон дмухає вогнем, дим можуть побачити лише ті, хто знаходиться на відстані не більшій ніж К від дракона.
Знаючи координати хатинки Сеньйора, а також усіх місць, де дмухав вогнем Дракон, скажіть, яка найменша можлива відстань К, при якій Сеньйор міг бачити дим хоча б К разів.
ВхідНі дані:
У першому рядку вхідних даних задані два цілих числа X та ¥ -координати хатинки Сеньйора. У наступному рядку задані два цілих числа N та К. У наступних N рядках задані пари цілих чисел Хі та у і - координати точок, в яких Дракон дмухав вогнем.
Вихідні дані:
В єдиному рядку виведіть найменше можливе значення В. Відповідь буде зарахованою, якщо її відносна або абсолютна похибка не перевищуватиме 10^-7.
Обмеження:
1 <= N <= 100,
1 <= К <= *Г,
0 <= X, У, Хі, Уі <= 1000000000 (109) .
Приклад вводу:
5 б
4 2
З 4
8 11
6 5
17 25
Приклад виводу:
2.82842712
Читайте также
Помогите Задания для 8 класса по ИНФОРМАТИКЕ*** Постройте математическую модель решения задачи. В одной упаковке находится n керамических
плиток размером 33 х 33 см.Сколько упаковок плитки потребуется для того,чтобы выложить ею пол в комнате прямоугольой формы размером а см х b см.
Задания для самостоятельной работы:
1. Имеются два числа.
a) Вычислите сумму и разность этих чисел,
используя два оператора readln.
b) Перепишите программу так, чтобы
использовался один оператор readln.
c) Добавьте комментарии к программе.
2. Имеются три числа. Вычислите их
произведение.
3. По заданным сторонам прямоугольника a и
b вычислите его периметр и площадь.
4. Человеку сегодня исполнилось R лет.
Сколько ему дней? Часов? Минут? Секунд? (Високосные годы не учитывать)
помогите плиииииииииииз!!!!!!!! Парочку заданий для олимпиады Выбери программу, которая в
первую очередь предназначена для работы с графической информацией
1)MicrosoftWord
2)MicrosoftPaint
3)WordPad
4) ни один из вариантов
_____________________________________
В городе Екатеринбурге около набережной реки Исеть стоит памятник, изображающий клавиатуру. Из скольки клавиш состоит данный памятник?
1) более 85
2)33
3)26
4)98
1)Информатика-это наука... 2)География-это наука... 3)Фонетика-это раздел науки о... 4)Ботаника-это раздел науки о... 5)Имя
существительное-это самостоятельная часть речи,...
6)Глагаол-это самостоятельная часть речи,...
7)Земледельцы-это люди,...
8)Животноводы-это люди,...
9)Тяжёлая промышленность-это...
10)Лёгкая ромышленность-это...
Ребята пожалуйста помогите решить задание для 6 класса по информатике.
Вы находитесь на странице вопроса "Задание. Для проведения эксперимента выбраны 10 районов Московской области.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.