поправить написанную прграмму

@kichaevantonio · Регистрация: 22.05.2015

Студворк — интернет-сервис помощи студентам

Название: BnTpdzOEHig.jpg
Просмотров: 23

Размер: 1.8 Кб

на картинке само задание. нам необходимо узнать, принадлежит ли точка данному рисунку. я сделал следующий вариант, преподаватель сказал что не правильно, и добавил что нужно брать не окружность а подсчет из прямоугольников, и тут у меня ступор.что делать?
При умножение x*x+y*y <1

Программа может быть следующей

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Sub logical()
 
Dim x, y As Double
 
x = Val(InputBox("Введите x"))
 
y = Val(InputBox("Введите y"))
 
If (x * x + y * y) < 1 Then MsgBox ("Принадлежит") Else MsgBox ("Не принадлежит")
 
End Sub

@Sur_L · 03.05.2017, 08:34

Сообщение от kichaevantonio

и тут у меня ступор.что делать?

Видимо к условию попадания в круг добавить условия попадания в квадраты, в первой и третьей четверти...

@kichaevantonio · 03.05.2017, 08:48 **[ТС]**

Сообщение от Sur_L

Видимо к условию попадания в круг добавить условия попадания в квадраты, в первой и третьей четверти...

Хоть на этом спасибо. возможно и так.

@_shark · 03.05.2017, 12:12

можно перемножить x и y между собой. Если произведение будет с положительным знаком, значит оба значения либо из первой четверти(++), либо из третьей(--)

@fever brain · 03.05.2017, 13:03

Чтото похожее я только что сделал, трудности были в системе координат
Проверить попадание с задаваемыми координатами (x,y) в заданную область. Записать логическое выражение, соотве

Новые блоги и статьи Все статьи Все блоги /
Функция установки текстового статуса в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .

@_shark 193 / 191 / 31 Регистрация: 11.10.2016 Сообщений: 610
	03.05.2017, 12:12
	можно перемножить x и y между собой. Если произведение будет с положительным знаком, значит оба значения либо из первой четверти(++), либо из третьей(--) 0

@fever brain oh my god 1456 / 796 / 161 Регистрация: 05.01.2016 Сообщений: 2,307 Записей в блоге: 8
	03.05.2017, 13:03
	Чтото похожее я только что сделал, трудности были в системе координат Проверить попадание с задаваемыми координатами (x,y) в заданную область. Записать логическое выражение, соотве 0