Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 15.03.2012
Сообщений: 70
1

плоскость

01.10.2012, 17:23. Просмотров 1214. Ответов 1
Метки нет (Все метки)

Даны целочисленные координаты точки на плоскости.Если точка совпадает с началом координат,то вывести 0.Если точка не совпадает с началом координат,но лежит на оси ОХ или ОУ,то вывести соответственно 1 или 2. Если точка лежит на координатных осях,то вывести 3
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.10.2012, 17:23
Ответы с готовыми решениями:

Координатная плоскость
Здрасти всем)) задали мне задачйу...а выглядит она так-----Oпределить ближайшую к началу координат...

Двумерная плоскость для рисования в Delphi, чтобы все вычисления производились видеокартой
Не знаю так ли это, но похоже canvas и прочие вещи обсчитываются cpu, а есть компоненты позволяющие...

плоскость в 3d
Здраствуйте у меня такая проблема: у меня есть функция от 2 переменных, и мне нужно отобразить...

плоскость
Добрый Вечер!!! На плоскости своими целыми координатами заданы N точек, обладающих некоторой...

1
3940 / 1865 / 337
Регистрация: 16.03.2012
Сообщений: 3,880
02.10.2012, 18:41 2
Лучший ответ Сообщение было отмечено Alesia как решение

Решение

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
program Project1;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils, Windows;
 
Var
  x,y : Integer;
  c : Char;
begin
  //Переключение окна консоли на кодовую страницу CP1251 (Win-1251).
  //Если после переключения русские буквы показываются неверно,
  //следует открыть системное меню консольного окна - щелчком мыши в левом
  //верхнем углу окна консоли и выбрать:
  //Свойства - закладка "Шрифт" - выбрать шрифт: "Lucida Console".
  SetConsoleCP(1251);
  SetConsoleOutputCP(1251);
 
  Repeat
 
    Write('Введите координату X : ');
    ReadLn(x);
    Write('Введите координату Y : ');
    ReadLn(y);
    WriteLn;
    //Проверим, где лежит точка...
    If ((x=0) And (y=0)) Then
    WriteLn('0') Else
    If x=0 Then
    WriteLn('1') Else
    If y=0 Then
    WriteLn('2') Else
    WriteLn('3');
    WriteLn;
 
    Write('Продолжим [y] :');
    ReadLn(c);
    WriteLn;
  Until Not (c In ['y','Y']);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.10.2012, 18:41

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

плоскость
помогите пожалуйста как в маткаде построить плоскость 4х-5y-10z-20=0

Плоскость в 3d
Изучаю самостоятельно 3d вопрос таков нарисовал я линию ломанную и замыкаю ее получается некая...

Бесконечная плоскость
Подскажите пожалуйста, можно ли и как создать бесконечную плоскость в opengl'е?

Плоскость отсечения
Здравствуйте, у меня вопрос: Функция glClipPlane(GL_CLIP_PLANE0, Clip_eq); Что означают элементы...


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

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

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