Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.50/18: Рейтинг темы: голосов - 18, средняя оценка - 4.50
4 / 4 / 0
Регистрация: 17.10.2014
Сообщений: 63

Задача про кирпич - как можно написать компактнее программу, чтобы она работала?

19.10.2014, 14:08. Показов 4138. Ответов 23
Метки нет (Все метки)

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub Кирпич()
 a = InputBox("Ширина кирпича a")
 b = InputBox(" Высота кирпича b")
 c = InputBox(" Длина кирпича c")
 x = InputBox(" Сторона x")
 y = InputBox(" Сторона y")
If ((x > b) And (y > c)) Or ((x > c) And (y > b)) Then
MsgBox ("Пройдёт")
Else
If ((x > b) And (y > a)) Or ((x > a) And (y > b)) Then
MsgBox ("Пройдёт")
Else
If ((x > a) And (y > c)) Or ((x > c) And (y > a)) Then
MsgBox ("Пройдёт")
Else
MsgBox ("Не пройдёт")
End If
End If
End If
End Sub
Язык VBA
1
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
19.10.2014, 14:08
Ответы с готовыми решениями:

Как в программу вставить функцию assign, чтобы она работала?
const Nmax = 100; { Максемальное колличество элементов множества } type T = Char; {тип элемента множества} TSet = Array...

Как переделать программу так чтобы она работала в виде процесса а не формы
Здравствуйте. Подскажите пожалуйста как переделать программу так чтобы она работала в виде процесса, а не формы? И что там писать вместо...

Как записать программу на HDD, чтобы она осталась и работала даже после форматирования
Привет. Как записать программу на HDD, чтобы она осталась и работала даже после форматирования? Или может программу можно прописать в...

23
 Аватар для Sasha_Smirnov
5562 / 1370 / 150
Регистрация: 08.02.2009
Сообщений: 4,109
Записей в блоге: 30
24.10.2014, 08:51
12345
Вложения
Тип файла: rar FitBricketPlane.rar (1.1 Кб, 4 просмотров)
0
 Аватар для Sasha_Smirnov
5562 / 1370 / 150
Регистрация: 08.02.2009
Сообщений: 4,109
Записей в блоге: 30
24.10.2014, 12:59
В итоге самую компактную программу предложила... сама Эсмиральда!

Я же, в погоне за универсальностью, как всегда наворотил. Мой вариант в Word (жать только Enter):
Вложения
Тип файла: doc building.doc (41.5 Кб, 8 просмотров)
0
6180 / 945 / 313
Регистрация: 25.02.2011
Сообщений: 1,381
Записей в блоге: 1
25.10.2014, 08:40
Цитата Сообщение от Sasha_Smirnov Посмотреть сообщение
Мой вариант в Word
Sasha_Smirnov, в Вашей реализации для кирпича вводится только 2 параметра, но должно быть три (ширина, высота, глубина), и в коде от Эсмиральды видно, что для окна вводятся два параметра, для кирпича три.
Мне кажется, что суть "задачи про кирпич" сводится в определении решения именно при этих исходных данных, определить влезет ли кирпич в окно, если его покрутить с разных сторон.

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

Кроме того, нет определенности можно ли кирпич засовывать по диагонали, вопрос поднимался в 8 посте, но ответ не получен от ТС.
кирпич 1*10*10 влезет в окно 9*9
1
 Аватар для Sasha_Smirnov
5562 / 1370 / 150
Регистрация: 08.02.2009
Сообщений: 4,109
Записей в блоге: 30
25.10.2014, 18:39
Что не запрещено — разрешено.

Но Эсмиральда отнеслась равнодушно, потому я и не стал возиться с синусами. Мне и без них на неделю развлечений!

Вроде как soon сделал это в теме Заданы размеры прямоугольного отверстия A,B и размеры кирпича X,Y,Z. Определить, пройдет ли кирпич в отверстие А также и Dzhej-Dzhej попытался: Определить, пройдет ли кирпич через отверстие.

Я это заметил даже не в 8-м, а у же во 2-м посте: #2!

Поскольку у ТС задача уже решена (упрощённо), то суть этой темы именно в компактности кода!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
25.10.2014, 18:39

Как написать программу, чтоб она работала только на одном компьютере
Как написать программу чтоб она работала на одном компьютере (Hard Disk serial можем ломать Парольь вовще ненужно что то такое...

Как написать программу на С++, чтобы можно было вводить матрицу с клавы и в итоге она появилась на экране?
#include<iostream> using namespace std; int main() { int n,m; cout<< " Vvedite razmer: ""\n"; cin>>n>>m; int *a=new int; ...

Переделать программу, чтобы она работала не с числами, а с символами
пожалуйста помогите переделать прогу на работу с символами!!!!!!! сейчас прога работает только с числами!!! unit Unit1; ...

Переделать готовую программу, чтобы она работала с файлом
здраствуйте форумчане! помогите переделать готовую программу, чтобы она работала с файлом. это готовая программа, без файлов. {№ 28 ...

Переписать программу, чтобы она работала не с текстом, а числами
Постараюсь быть максимально конкретным. Прога на языке Си. Здесь (проверено) работающая нормально прога с символами. В одном документе...


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

Или воспользуйтесь поиском по форуму:
24
Ответ Создать тему
Новые блоги и статьи
Свет внутри себя
kumehtar 07.06.2026
Пусть это будет здесь lIs4oanZS9Y
Программа для com-порта
Uhbif79 05.06.2026
Всем привет, давно хотел изучить Qt, начинал, бросал, потом снова начинал. И сейчас вот смог написать свою первую программу. До этого имел опыт программирования микроконтроллеров, писал прошивки на. . .
Транскрипция 55-минутного видео через Whisper: WhisperDesktop облажался, спас Google Colab[
anaschu 01.06.2026
Понадобилось получить текст из свежезагруженного видео на YouTube. Казалось бы, задача на пять минут. Заняла полтора часа. Делюсь опытом — может кому пригодится последовательность решений. . . .
21 мат мед. Планы на развитие модели здравоСохранения
anaschu 01.06.2026
AnyLogic: план развития симуляционной модели рабочего коллектива — динамический абсентеизм, реальные данные, три сценария сравнения Продолжаю серию постов о дискретно-событийной модели рабочего. . .
20. Мат мед. Абсентеизм как отдельный тип простоя
anaschu 29.05.2026
Апдейт модели: исправленные баги, абсентеизм и новые механизмы Продолжаю развивать ранее описанную модель рабочего коллектива на AnyLogic. За последние несколько дней был проведён серьёзный. . .
19. здоровье, усталость и психотип работника влияют на производительность предприятия, и наоборот, производительность на здоровье, усталось и психотип
anaschu 28.05.2026
Дискретно-событийная модель рабочего коллектива на AnyLogic: здоровье, выгорание, психотипы и микростимуляция Привет, коллеги. Хочу поделиться итогами нескольких недель работы над симуляционной. . .
"Прокси" для последовательного порта
Eddy_Em 28.05.2026
Эту штуку написал я достаточно давно. Но сейчас вот понадобилось настроить датчик грозы, но при этом не отключать его от "метеодемона". Соответственно, надо запустить этот "прокси": метеодемон будет. . .
Рефакторинг программы уравнивания.
Massaraksh7 26.05.2026
Пример по предыдущей записи в блоге. Но, надо заметить, что, во-первых, там оптимизация не только математики, но и работы с базой данных, и с графами, а во-вторых, это ещё не всё.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru