Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 22.02.2021
Сообщений: 13
1

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

28.02.2021, 14:12. Показов 773. Ответов 1

Author24 — интернет-сервис помощи студентам
В области 10 районов. Для каждого известны площади, засеянные пшеницей, и урожай, собранный с этих площадей. Определите, в каком районе средняя урожайность пшеницы была выше.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
28.02.2021, 14:12
Ответы с готовыми решениями:

Даны 5 районов. Определить, в каком районе урожайность лучше, а также среднюю урожайность
Здравствуйте. Такая задача: В области 5 районов. Заданы: названия районов; площади, засеваемые в...

В каком районе средняя урожайность пшеницы была выше
В области 10 районов. Для каждого района известны площади, засеянные пшеницей и урожай собранный с...

Определить, в каком районе средняя урожайность пшеницы была самой низкой
В области 10 районов. Для каждого района известны площади, засеянные пшеницей и урожай, собранный с...

Ввести урожайность трех сортов пшеницы и размеры трех соответствующих полей.Сколько собрали пшеницы с каждого поля в отдельности и с трех полей вместе
Напишите решение в Паскале

1
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
28.02.2021, 14:36 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
const n=10;
var s,u:array[1..n] of integer;
    i,imx:integer;
begin
randomize;
writeln('Номера районов');
for i:=1 to n do
if i=1 then write(i:4)
else write(i:5);
writeln;
writeln('Площади засеянные пшеницей, га');
for i:=1 to n do
 begin
  s[i]:=500+random(500);
  write(s[i]:5);
 end;
writeln;
writeln('Собранный урожай, цн');
imx:=1;
for i:=1 to n do
 begin
  u[i]:=5000+random(5000);
  write(u[i]:5);
  if u[i]/s[i]>u[imx]/s[imx] then imx:=i;
 end;
writeln;
write('Наивысшая средняя урожайность в районе ',imx);
end.
1
28.02.2021, 14:36
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
28.02.2021, 14:36
Помогаю со студенческими работами здесь

Вывести на экран список названий месяцев, в которых средняя температура была выше 7 градусов.
Известны среднемесячные температуры за год. Вывести на экран список названий месяцев, в которых...

Дан массив температур. Определите, в каком месяце была самая высокая температура, а в каком самая низкая
Дан массив среднемесячных температур за год. Определите, в каком месяце была самая высокая...

Определить среднюю урожайность пшеницы
В области 20 районов. Площади, засеянные пшеницей (в гектарах), и урожай, собранный в каждом районе...

Массив. Определить среднюю урожайность пшеницы
В области n<=10 районов. Для каждого района известны площади, засеянные пшеницей и урожай,...

Определить среднюю урожайность пшеницы по каждому району
В области 20 районов. Площади, засеянные пшеницей (в гектарах), и урожай, собранный в каждом районе...

Определить среднюю урожайность пшеницы по каждому району и по области
Здраствуйте товарищи программисты! помогите плиз с программным кодом задача: В области 20...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Как в цикле обойти все поля объекта в JavaScript
bytestream 28.01.2025
Объекты в JavaScript представляют собой фундаментальные структуры данных, которые позволяют хранить и организовывать связанную информацию в виде пар ключ-значение. Каждый объект можно представить как. . .
Как выбрать строки в DataFrame по значению столбца в Pandas
bytestream 28.01.2025
В области анализа данных библиотека Pandas стала незаменимым инструментом для работы с табличными данными в Python. Эта мощная библиотека предоставляет множество функций для эффективной обработки и. . .
Как сделать перенос строки в Bash
bytestream 28.01.2025
При работе с командной оболочкой Bash разработчики часто сталкиваются с необходимостью форматирования текстового вывода, где ключевую роль играет правильное управление переносами строк. Умение. . .
Поиск подстроки в строке с помощью Bash
bytestream 28.01.2025
Поиск подстроки в строке является одной из важных задач в программировании и обработке текстов. Применение такого поиска можно найти в самых разных областях, от анализа данных до разработки. . .
[golang] 169. Majority Element
alhaos 28.01.2025
Тут надо вернуть "мажористый" элемент который встречается в слайсе больше чем в половине случаев. По условиям задачи во входных данных такой элемент обязан присутствовать. / / . . .
Когда лучше использовать LinkedList вместо ArrayList в Java
bytestream 28.01.2025
При разработке Java-приложений выбор правильной структуры данных играет ключевую роль в обеспечении эффективности и производительности программы. ArrayList и LinkedList являются двумя. . .
Какой ответ HTTP лучше использовать: 403 Forbidden или 401 Unauthorized, когда недостаточно прав
bytestream 28.01.2025
В современной веб-разработке правильная обработка ошибок и точное информирование клиентов о статусе их запросов играют критическую роль в создании надежных и безопасных приложений. Особое внимание. . .
Как получить список всех файлов коммита в Git
bytestream 28.01.2025
Система контроля версий Git представляет собой мощный инструмент для управления изменениями в программном коде и других файлах проекта. В основе работы Git лежит концепция коммитов - снимков. . .
Как записать только часть изменений файла в Git
bytestream 28.01.2025
В процессе разработки программного обеспечения часто возникает необходимость сохранить только определенные изменения из множества внесенных правок в файлах. Система контроля версий Git предоставляет. . .
[golang] 80. Remove Duplicates from Sorted Array II
alhaos 28.01.2025
В предоставленном упорядоченном по возрастанию целочисленном слайсе, оставить уникальные элементы полюс один возможный дубликат. Вернуть количество таких элементов. / / . . .
Что такое внедрение зависимостей и для чего оно применяется
bytestream 27.01.2025
В современной разработке программного обеспечения одной из ключевых проблем является управление зависимостями между различными компонентами системы. Внедрение зависимостей (Dependency Injection, DI). . .
Как установить cellpadding и cellspacing в CSS
bytestream 27.01.2025
При создании веб-страниц с табличными данными разработчики часто сталкиваются с необходимостью правильного оформления внутренних и внешних отступов в таблицах. В традиционной разметке HTML для этих. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru