Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
Anicoros
0 / 0 / 0
Регистрация: 19.03.2015
Сообщений: 19
1

Для заданных a и b найти все точки с целочисленными координатами, находящиеся внутри эллипса

12.06.2016, 15:59. Просмотров 932. Ответов 2
Метки нет (Все метки)

Для заданных a и b найти все точки с целочисленными координатами, находящиеся внутри эллипса http://www.cyberforum.ru/cgi-bin/latex.cgi?\frac{{x}^{2}}{{a}^{2}}+\frac{{y}^{2}}{{b}^{2}}\leq 1
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.06.2016, 15:59
Ответы с готовыми решениями:

Вычислите количество точек с целочисленными координатами,находящиеся в круге радиуса R (R>0)
вычислите количество точек с целочисленными координатами,находящиеся в круге...

Посчитать кол-во точек с целочисленными координатами, лежащих внутри многоугольника
Многоугольник(не обязательно выпуклый) задан на плоскости координатами его...

Требуется подсчитать количество точек с целочисленными координатами, лежащих внутри многоугольника
3. Многоугольник (не обязательно выпуклый) на плоскости задан координатами...

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

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

2
Peoples
1352 / 841 / 749
Регистрация: 06.02.2016
Сообщений: 2,243
Записей в блоге: 18
Завершенные тесты: 4
12.06.2016, 16:15 2
Лучший ответ Сообщение было отмечено Anicoros как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
program pr;
var
  a, b, x, y: integer;
begin
  writeln('Введите а');
  readln(a);
  writeln('Введите b');
  readln(b);
  for x := -a to a do
    for y := -b to b do
      if  (((x * x) / (a * a)) + ((y * y) / (b * b))) <= 1  then
      begin
        writeln('(', x, ':', y, ')');
      end;
end.
1
Satoshi_Kun
0 / 0 / 0
Регистрация: 16.05.2016
Сообщений: 5
12.06.2016, 17:30 3
а не проще писать вместо x*x, sqr(x) ?
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.06.2016, 17:30

Найти количество точек плоскости с целочисленными координатами, попадающие в кольцо
Помогите с задачкой пожалуйста=) Найти количество точек плоскости с...

На плоскости заданы N различных точек с целочисленными координатами.Нужно найти максимальную площадь треугольника
На плоскости заданы N различных точек с целочисленными координатами.Нужно найти...

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


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru