С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/15: Рейтинг темы: голосов - 15, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 24.04.2012
Сообщений: 6

Строительство многоквартирного дома

03.10.2012, 23:14. Показов 3196. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите пожалуйста написать программу к данной задаче:

Из блоков двух видов А и В строятся дома двух типов I и II . В одном доме типа I можно поселить 100 человек, а в доме типа II — 200 человек. Запасы блоков каждого вида ограничены и составляют для блоков вида А - 9 условных единиц (одна единица может, например, составлять 50 блоков ) и для блоков вида В - 8 условных единиц (условные единицы для разных видов блоков могут быть совершенно различными). На строительство одного дома типа I идет 1 единица блоков вида А и 2 единицы блоков вида В , на один дом типа II — 3 единицы блоков вида А и 1 единица блоков вида В. Сколько домов типа I и II следует построить, чтобы можно было разместить в них наибольшее количество людей?

Заранее благодарен!)
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
03.10.2012, 23:14
Ответы с готовыми решениями:

Структура: Система учета за отопление многоквартирного дома
Здарствуйте, помогите с задачей пожалуйста. Система учета за отопление многоквартирного дома Таблица ФИО Квартира площадь Тариф 1. ...

Строительство дачного дома своими руками
Речь идёт о строительстве бревенчатого дома без нанимание рабочих, по причине много берут и халтурят! Мой дом стоит уже 25 лет так и...

Как опротестовать строительство нового жилого дома в своём районе?
У нас в квартале собираются построить жилой дом, этажей на 5. Даже два дома вроде бы. Никаких стендов не видно поэтому пока не сказать,...

1
Почетный модератор
 Аватар для КонецСвета
7966 / 3937 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
04.10.2012, 00:16
Лучший ответ Сообщение было отмечено xXxKirillxXx как решение

Решение

сокращенный вариант
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var i,j,uea,ueb,kl,kmax,imax,jmax: integer;
 
begin
write('"Стоимость" условной единицы А: '); readln(uea);
write('"Стоимость" условной единицы B: '); readln(ueb);
kmax:=0;
for i:=1 to (uea*9) div 3 do
    for j:=1 to (ueb*8) div 4 do
        begin
        kl:=((i*100)+(j*200));
        if kl>kmax then
           begin
           kmax:=kl;
           imax:=i; jmax:=j;
           end;
        end;
writeln('Наибольшее количество людей (',kmax,')');
writeln('можно разместить в ',imax,' домах А-типа');
writeln('и ',jmax,' домах В-типа');
end.
Добавлено через 5 минут
полный вариант (с выводом всех возможных вариантов)
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
35
36
37
38
uses crt;
const l='-------------------------------';
      s='| А-тип | B-тип | Всего людей |';
var i,j,uea,ueb,kl,kmax,imax,jmax,kr: integer;
 
begin
write('"Стоимость" условной единицы А: '); readln(uea);
write('"Стоимость" условной единицы B: '); readln(ueb);
kmax:=0;
writeln(l);
writeln(s);
writeln(l);
for i:=1 to (uea*9) div 3 do
    for j:=1 to (ueb*8) div 4 do
        begin
        inc(kr);
        if kr mod 19=0 then
           begin
           writeln('Enter to continue...');
           readln();
           clrscr;
           writeln(l);
           writeln(s);
           writeln(l);
           end;
        kl:=((i*100)+(j*200));
        writeln('|',i:4,'|':4,j:4,'|':4,kl:10,'|':4);
        if kl>kmax then
           begin
           kmax:=kl;
           imax:=i; jmax:=j;
           end;
        end;
writeln(l);
writeln('Наибольшее количество людей (',kmax,')');
writeln('можно разместить в ',imax,' домах А-типа');
writeln('и ',jmax,' домах В-типа');
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
04.10.2012, 00:16
Помогаю со студенческими работами здесь

Организовать сеть многоквартирного
Не совсем понимаю задание. Организовать сеть многоквартирного дома с маской / 24. В сети должно быть 2 сервера, 1 шлюз.

У меня и дома и на работа роутер керио стоит, как использовать рабочий интернет от дома?
У меня и дома и на работа роутер керио стоит, на работе у нас интернет без лимит и с 4м\бит скорость, а дома у меня ограниченные траффик...

Построить на экране рисунок одно подъездного дома, если известны координаты левого верхнего угла дома
Построить на экране рисунок одно подъездного дома, если известны координаты левого верхнего угла дома, ширина и высота этажа. (дом должен...

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

Строительство подвального этажа
Фирма, в которой вы работаете, исполняет проект строительства суперсовременного бизнес-центра. И вот, когда заказ на склад строительных...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути
Programma_Boinc 01.01.2026
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru