diagen_62

Составить программу, вычисляющую количество точек на графике функции, лежащих левее прямой, проходящей через начало координат с углом наклона 135 градусов.используя while и repeat....помогите, будьте добры))заранее благодарю


Исходя из понятий современной геометрии, количество таковых точек - бесконечно много, так как любой график есть отображение множества точек, подчиненных какому-либо закону (линия/прямая/отрезок в пространстве), состоящего из бесконечного числа точек. Более конкретно задания нужно писать. И нужно создавать новую тему, потому как ваш вопрос к прогрессии ну совсем никакого отношения не имеет. Ваш модератор.

diagen_62

Составить программу, вычисляющую количество точек на графике функции, лежащих левее прямой, проходящей через начало координат с углом наклона 135 градусов.используя while и repeat....помогите, будьте добры))заранее благодарю

Vladimir_S

Полный бред.
Какой язык? Pascal? Delphi?
Графике какой функции? Как заданной? Для справки: количество точек на любом отрезке любой кривой есть континуум, т.е. бесконечность.
Только не надо, пожалуйста, детского сада типа "А мне так дали!".

diagen_62

язык-Pascal
график, например cos(x).Прямая, например y=4x
чтобы не получилось бесконечное количество точек нужно взять какой нибудь шаг.Например 5...вот так

diagen_62

помогите, кто-нибудь(((

AlexZir

1) откуда берутся точки?
2) что за график?
3) составьте уравнение функции, график которой будет проходить через начало координат под углом наклона, например, 135 градусов. Тут ещё вопрос - а система координат какая используется? Декартовая?

__________________
Убить всех человеков!

Vladimir_S

Да пожалуйста - какие проблемы:

diagen_62

может кто нибудь объяснить, что программа делает.мне непонятны вот эти строчки


BEGIN
N:=0;
X_fun:=-Pi;
Repeat
X_line:=-f(X_fun);
If X_fun<X_line then Inc(N);
X_fun:=X_fun+Pi/180;
Until X_fun>Pi;
WriteLn('Number of points is ',N);

Vladimir_S

Может. И не кто-нибудь, а автор.

N:=0; - обнуление исходного значения счетчика точек.

X_fun:=-Pi; - задание начальной (самой левой) точки графика (-пи).

Repeat
X_line:=-f(X_fun); - тут несколько сложнее. Прежде всего, что есть линия, идущая под углом 135°? А это ни что иное, как график функции у=-х. Дальше отслеживаются две х-координаты: этой прямой (X_line) и функции (X_fun). Как решается задача? А вот как:
1. Задаём точку X_fun.
2. По ней находим ординату функции: y=f(X_fun).
3. Через эту точку графика функции мысленно проводим прямую, параллельную оси абсцисс, до пересечения с прямой у=-х.
4. Определяем абсциссу этой точки пересечения. Это и есть X_line.

If X_fun<X_line then Inc(N); - если выполняется условие X_fun<X_line, то это и означает, что точка графика функции лежит левее прямой. В этом случае значение счетчика увеличивается на 1.

X_fun:=X_fun+Pi/180; - обрабатывается следующая точка графика. Шаг задан в 1°.

Until X_fun>Pi; - счет заканчивается по достижении максимального значения аргумента функции, в данном случае это +пи.

WriteLn('Number of points is ',N); - вывод результата (количества точек, лежащих левее прямой у=-х.

diagen_62

мало что понятно(((а по проще никак нельзя составить программу?