Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 26.11.2022
Сообщений: 21

Никак не могу сделать чтобы введённые координаты не попадали в ромб

08.12.2022, 18:32. Показов 311. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Составить алгоритм и программу, проверяющую, попадает ли
введенная точка с координатами (x, y) в заштрихованную фигуру (граница
принадлежит фигуре).
Миниатюры
Никак не могу сделать чтобы введённые координаты не попадали в ромб  
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
08.12.2022, 18:32
Ответы с готовыми решениями:

Как сделать так, чтобы по нажатию кнопки цифры, введённые в textBox ы, попадали в программу?
По умолчанию в моих textBox'ax стоит цифра "2" (в некоторых "5" или "3", не суть важно). Цифры textBox oв попадают в программу и на их...

Никак не могу сделать чтобы удаленные элементы заменяло на 0
Никак не могу сделать чтобы удаленные элементы заменяло на 0.Вот условие: Напишите функцию для удаления строки из двумерного массива....

Никак не могу решить. Как сделать чтобы считало цыфры?
\\Написать сколько простых чисел находиться в промежутке , разработать функцию, которая проверяла, есть ли натуральное число простым. ...

3
Модератор
10450 / 5740 / 3409
Регистрация: 17.08.2012
Сообщений: 17,470
08.12.2022, 23:56
Pascal
1
2
3
4
5
6
7
8
9
10
var
  x, y: real;
begin
  write('x = ');
  readln(x);
  write('y = ');
  readln(y);
  if (x * x + y * y <= 3 * 3) and (abs(y) + 3 / 2 * abs(x) >= 3) then writeln('Попадает')
  else writeln('Не попадает')
end.
0
0 / 0 / 0
Регистрация: 26.11.2022
Сообщений: 21
09.12.2022, 07:46  [ТС]
Объясните почему именно так задаётся ромб
0
Модератор
10450 / 5740 / 3409
Регистрация: 17.08.2012
Сообщений: 17,470
09.12.2022, 12:41
В данном случае ромб расположен симметрично относительно осей координат, поэтому можно проверять только четверть ромба. Абсолютные значения кординат располагаются в первом квадранте, вот эту четверть ромба и будем проверять. Сторона ромба, расположенная в первом квадранте, является частью прямой y=3-3/2x. Абсолютные значения кординат, расположенные выше прямой, лежат снаружи ромба. Значит, должно быть abs(y)>=3-(3abs(x))/2, или abs(y)+3/2abs(x)>=3.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
09.12.2022, 12:41
Помогаю со студенческими работами здесь

Никак не могу сделать, чтобы считал от 1 до 1000 ТОЛЬКО нечетные и без пробелов
Sub Кнопка2_Щелчок() Dim i As Integer For j = 1 To 10 For i = 1 To 1000 Step 2 '(без пробелов чтобы считал)' Sheets(1).Cells(i,...

Как сделать так, чтобы класс в заголовочном файле запомнил введенные в консоль данные? Когда я пытаюсь вывести введенные
//ssssss.cpp #include &quot;pch.h&quot; #include &lt;iostream&gt; #include &lt;string&gt; #include &lt;Windows.h&gt; #include...

Maven. как сделать так, чтобы родительские зависимости попадали в дочерний jar
Проблема в следующем. Есть проект назовём его Main. Из него захотелось вытащить часть в jar(чтобы потом подключить как зависимость)....

Отчёт СКД. Как сделать так, чтобы в него попадали только данные за оба периода
Приветствую. Не подскажите, как сделать в отчёте так, чтобы в него попадали только данные за оба периода? Т.е. чтобы здесь выводилось...

Каким скриптом или может простым способ можно сделать, чтобы некоторые ссылки не попадали в историю?
каким скриптом или может простым способ можно сделать, чтобы некоторые ссылки не попадали в историю


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru