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

Оклейка обоев

07.02.2019, 17:45. Показов 6270. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Известный программист Василий решил наконец сделать ремонт в своей комнате и наклеить на стены новые обои. Василий выяснил, что все обои, продающиеся в ближайшем магазине, имеют ширину ровно 1 метр. Обои продаются в рулонах, в каждом рулоне N метров обоев. Измерив размеры своей комнаты, Василий выяснил, что её ширина W метров, длина L метров, а высота H метров.
Конечно, в комнате есть окна и дверь, но Василий решил, что не будет их учитывать, а оставшиеся излишки обоев оставит про запас. Также Василий хочет клеить обои только вертикально (от потолка до пола) и не хочет, чтобы в обоях были горизонтальные стыки (если высота потолка три метра, то нельзя наклеить кусок в метр и ещё кусок в два метра, так как это нарушит рисунок обоев).
Сколько рулонов потребуется купить Василию, чтобы оклеить всю комнату обоями?

Входные данные
Вводятся натуральные числа N, W, L, H каждое на отдельной строке. Число N не превышает 2∙109, а числа W, L, H -- 106.

Выходные данные
Необходимо вывести одно число – количество рулонов, которое необходимо купить Василию.

Не могу понять, как сделать с условием, где обои должны висеть вертикально без стыков...
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
07.02.2019, 17:45
Ответы с готовыми решениями:

Определить количество рулонов обоев
Пожалуйста,помогите с задачей: Определить количество рулонов обоев, необходимых для оклейки 1, 2, 3 и т. д. комнат.

Сколько нужно рулонов обоев для оклейки комнаты
Сколько нужно рулонов обоев для оклейки комнаты длиной m метров, шириной n метров и высотой h метров, если ширина рулона k см, а длина 10...

Сколько нужно рулонов обоев для оклейки комнаты длиной m метров, шириной n метров и высотой h метров?
1. Одна задача - одна тема. Тем более что картинку вы не вложили. 2.Сколько нужно рулонов обоев для оклейки комнаты длиной m метров,...

1
Платежеспособный зверь
 Аватар для кот Бегемот
8966 / 4389 / 1655
Регистрация: 28.10.2009
Сообщений: 11,647
07.02.2019, 20:08
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
p,n,w,l,h,rez:longint;
begin
readln(n,w,l,h);
p:=0;
while p<(2*w+2*l) do
begin
p:=p+n div h;
inc(rez);
end;
writeln(rez);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
07.02.2019, 20:08
Помогаю со студенческими работами здесь

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

Оклеить комнату обоями, программа должна посчитать остаток обоев в процентах
Помогите написать программу: &quot;нужно обклеить комнату обоями, программа должна посчитать остаток обоев в %..&quot; У меня есть размеры...

Сколько трубок обоев нужно купить для оклеивания квадратной комнаты?
сколько трубок обоев нужно купить для оклеивания квадратной комнаты шириной A и высотой N , в которой есть два окна и дверь с размерами C...

Какую сумму необходимо потратить на ремонт, если цена одного рулона обоев K руб?
Хозяин хочет оклеить обоями длинную стену в своем доме. Длина этой стены равна A и высота B. В рулоне 12 м обоев шириной 1 м. Какую сумму...

Определить, сколько рулонов обоев нужно для оклейки комнаты
ПЛОЩАДЬ КОМНАТЫ 40 КВАДРАТОВ ОДИН РУЛОН ОБОЕВ НА 1,5 КВАДРАТА СКОЛЬКО РУЛОНОВ обоев НАДО BEGIN VAR a,b:integer; a=40; b=1,5; ...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru