Добавить засечки на оси графика, с помощью модуля GraphABC

@nike · Регистрация: 22.12.2011

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

Есть исходник. Требуется добавить засечки по оси x согласно заданному интервалу и шагу аргумента, по оси y согласно значению функции(допустим максимальное значение функции 5, а минимальное -2, следовательно добавить засечки на интервале [-2,5]).

Pascal
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
uses
  graphabc;
const
  m = 50;
  cx = 500;
  cy = 500;
var
  c0, c1, c2, c3, c4, c5: real;
  a, b, x, h: real;
  x1, x2, y1, y2: integer;
function f(x: real): real;
begin
  f := c0 + c1 * x + c2 * x * x + c3 * x * x * x + c4 * x * x * x * x + c5 * x * x * x * x * x;
end;
begin
  writeln('Программа строит график функции многочлена до 5 степени включительно.');
  writeln('Введите коэффициенты c0 c1 c2 c3 c4 c5');
  readln(c0, c1, c2, c3, c4, c5);
  writeln('Введите отрезок и шаг a b, h');
  readln(a, b, h);
  x := a;
  x1 := cx + Round(m * a);
  y1 := cy - Round(m * f(a));
  while x <= b do
  begin
    x2 := cx + Round(m * x);
    y2 := cy - Round(m * f(x));
    Line(x1, y1, x2, y2);
    x1 := x2;
    y1 := y2;
    x := x + h;
  end;
  Line(0, cy, 2 * cx, cy);
  Line(cx, 0, cx, 2 * cy); 
end.

@nike · 28.04.2012, 00:00 **[ТС]**

up!!!

Новые блоги и статьи Все статьи Все блоги /
Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .

@nike 4 / 1 / 1 Регистрация: 22.12.2011 Сообщений: 9
	28.04.2012, 00:00 [ТС]
	up!!! 0