построить график

@yumik · Регистрация: 11.11.2009

Построить график функции y=sin(x) . На экране отобразить и подписать оси координат x, y.

@Давид · 29.11.2009, 18:34

yumik,

Pascal

uses graph;
var gd,gm:integer;
    x0,y0:integer;
    x,y,dx:real;
begin
gd:=0;
initgraph(gd,gm,'');
x0:=getmaxX div 2;
y0:=getmaxY div 2;
line(10,y0,630,y0);
outtextXY(625,y0+10,'X');
line(x0,0,x0,460);
outtextXY(x0+5,0,'Y');
outtextXY(x0+5,y0+10,'0');
line(x0-3,y0-100,x0+3,y0-100);
outtextXY(x0+5,y0-100,'5');
line(x0-50,y0-3,x0-50,y0+3);
outtextXY(x0-50,y0+10,'-2.5');
x:=-20;
dx:=0.001;
while x<=20 do
 begin
  y:=sin(x);
  putpixel(x0+round(x*20),round(y0-round(y*20)),12);
  x:=x+dx;
 end;
readln;
closegraph;
end.

@yumik 2 / 2 / 0 Регистрация: 11.11.2009 Сообщений: 28
		1
	построить график 29.11.2009, 18:29. Показов 1184. Ответов 1 Метки нет (Все метки) Построить график функции y=sin(x) . На экране отобразить и подписать оси координат x, y. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

построить график

Решение