Способы связи
- 
- 
- Оказываем услуги
Главные менеджеры
Менеджер Елена Картиза - помогает в оформлении заказов на сайте. Ей можно задать любые интересующие вас вопросы.
Менеджер Галина Евсютина - специалист отдела качества. Проверяет выполненные работы на соответствие всем требованиям.
Менеджер Анастасия Ветрицина - подберет специалиста, который займется выполнением вашего задания.
Справочник студента
Проконсультируем прямо сейчас
Мы онлайн в наших сообществах. ПН - ВС 08:00-22:00
Построить график функции y = x^2 на отрезке [a, b]. (программа Паскаль)
От нашего клиента с логином ndAWGYMQ на электронную почту пришел вопрос: "Построить график функции y = x^2 на отрезке [a, b]. (программа Паскаль)" это здание мы отнесли к разделу ЕГЭ (школьный). Так как клиент является зарегистрированным пользователем нашего сайта, то мы бесплатно предоставим ответ.
ЕГЭ (школьный) - довольно сложный раздел, здесь действительно попадаются вопросы, которые даже у специалиста с законченным высшим образованием поставят в тупик при подготовке правильного ответа. Но мы известны тем, что сложности нас не останавливают, а наоборот развивают и расширяют наши знания.
Вы спрашивали Построить график функции y = x^2 на отрезке [a, b]. (программа Паскаль)? - отвечаем:
Var gD, gM, n: integer;
a, b: real;
function f (x: real) : real;
Begin
f:= x*x
End;
Procedure graf (x0, x1, y0, y1, n: word; a, b: real);
Var h, m, x, t1, t2 :real;
i, u, v, xv, yv: word;
begin
h:= (b-a)/n; {Нахождение шага разбиения}
m:= abs(f(a)); {Поиск значения функции в левом конце отрезка}
t1:= (x1-x0) / (b-a); t2:= (y1-y0) / (2*m);
{Построение координатных осей}
setfillstyle (1,15); bar( x0-5, y0-5, x1+5, y1+5);
xv:= round(x0-a*t1); yv:= round((t0+y1) / 2);
line (x0, yv, x1, yv);
{Установка текущего курсора в начало графика}
Moveto (x0, yv-round (f (a)*t2);
{Построение графика}
Setcolor (3);
For i:= 1 to n do
Begin
x:= a+i*h; u:= x0+round ( (x-a)*t1);
v:= yv:= round (f (x)*t2); lineto (u, v);
end;
end; {Конец процедуры}
begin
clrscr; readln (a, b, n); gD:= Detect;
Initgraph (gD, gM, ‘’);
graf (100, 500, 50, 300, n, a, b);
Readln; Closegraph
end.
