Написать программу на языке программирования для задания: вывести в центре экрана график функции y = x2.
Пример решения –
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormPaint(Sender: TObject);
var x,y,xx,yy:integer;
begin
xx:=Form1.ClientWidth div 2;
yy:=Form1.ClientHeight div 2;
with Canvas do
begin
MoveTo(xx,0); LineTo(xx,yy*2);
MoveTo(0,yy); LineTo(xx*2,yy);
for x:=-100 to 100 do
begin
y:=-(x*x)div 60;
Ellipse(x+xx,y+yy,x+xx+2,y+yy+2);
end;
end;
end;
end.
МИНИСТЕРСТВО ОБРАЗОВАНИЯ
РОССИЙСКОЙ ФЕДЕРАЦИИ
ИЖЕВСКИЙ ГОСУДАРСТВЕННЫЙ ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ
Никитин Ю.Р.
Программирование на ассемблере
МЕТОДИЧЕСКИЕ ПОСОБИЕ
по дисциплине
“Основы вычислительной техники”
Ижевск 2002
УДК 681.3.06(07)
Никитин Ю.Р., Трефилов С.А. Программирование на ассемблере: методическое пособие по дисциплине “Основы вычислительной техники”. - Ижевск: ИжГТУ, 2002.
Методическое пособие предназначено для помощи при подготовке к практическим и лабораторным работам по дисциплине “Основы вычислительной техники” для студентов специальностей 210300 “Роботы и робототехнические системы”, 071800 “Мехатроника”.
Методическое пособие для практических и лабораторных работ содержит основные сведения об ассемблере, режимах адресации, командах процессора и отладчика DEBUG, примеры программ на ассемблере.
Целью практических и лабораторных занятий является усвоение теоретических положений изучаемой дисциплины, закрепление и углубление знаний, полученных студентами на лекциях, получение навыков программирования на ассемблере, в машинных кодах и отладки программ с помощью отладчика DEBUG.