Подякувати Студентському архіву довільною сумою
Admin
26.02.2023 12:38
Дякуємо, що користуєтесь нашим архівом!
Інформатика
Інформація про навчальний заклад
ВУЗ:
Національний університет Львівська політехніка
Інститут:
Інститут телекомунікацій, радіоелектроніки та електронної техніки
Факультет:
УІ
Кафедра:
Радіоелектроніки та електронної техніки (РЕПС)
Інформація про роботу
Рік:
2024
Тип роботи:
Лабораторна робота
Предмет:
Інформатика та обчислювальна техніка
Варіант:
2 11
Частина тексту файла (без зображень, графіків і формул):
Мета роботи - засвоїти методику та виробити практичні навики застосування засобів графічного виводу інформації на прикладі побудови графічних позначень елементів радіоелектронних схем.
ЗАВДАННЯ
Розробити підпрограму-процедуру для побудови графічного позначення електрорадіоелемента і викликаючу її головну програму. В якості параметрів процедура повинна отримувати координати точки з’єднання елемента А у вигляді запису з полями X,Y. В головній програмі необхідно проініціалізувати графічний режим і побудувати зображення елемента в різних частинах екрану. Побудувати позначення елемента з різними орієнтаціями і передачею процедурі орієнтації в якості параметру послідовного типу.
1.ПОСТАНОВКА ЗАДАЧІ.
Потрібно завантажити і проініціалізувати графічний драйвер. Потім у процедуру ввести параметри елемента. Масштаб та кординати точки А потрібно вводити багаторазово тому використовуємо цикл.
Кожен раз після вводу масштабу та координатів слід викликати процедуру.
2.РОЗРОБКА СТРУКТУРИ ДАНИХ.
№п(п
Позначення
Ім’я(
Тип
Призначення, опис
1
gd,gm, pathtodriver
gd,gm, pathtodriver
-
Змінні необхідні для реалізації графічного драйвера
2
v
v
ціла
Кількість фігур
3
x,y
x,y
ціла
Координати графіка(точки А)
4
М
М
ціла
масштаб
5
і
і
ціла
Необхідна для утворення циклу
6
F
F
процедура
Містить усі параметри фігури
3.РОЗРОБКА БЛОК-СХЕМИ АЛГОРИТМУ.
4.ЗАПИС ТЕКСТУ ПРОГРАМИ.
program jygh;
uses graph,keyboard;
var gd,gm:smallint;v,x,y,m,i:integer;
pathtodriver:string;
procedure f(x,y:integer);
begin
line(x,y,x+12*m,y);line(x+18*m,y,x+23*m,y);
Rectangle(x+12*m,y-2*m,x+18*m,y+2*m);
circle(x+15*m,y,6*m);
line(x+18*m,y-8*m,x+21*m,y-10*m);
line(x+20*m,y-6*m,x+23*m,y-8*m);
line(x+18*m,y-8*m,x+19*m,y-10*m);
line(x+20*m,y-6*m,x+21*m,y-8*m);
line(x+18*m,y-8*m,x+20*m,y-8*m);
line(x+20*m,y-6*m,x+22*m,y-6*m);
end;
begin
writeln('skilku raziv hoshete pobashutu figyry');
readln(v);
gd:=0; initkeyboard; initkeyboard; initgraph(gd,gm,'');
RestoreCrtMode;
for i:=1 to v do begin
writeln('vvedit x');
readln(x);
writeln('vvedit y');
readln(y);
writeln('vvedit mashtab');
readln(m);
f(x,y);
end;readln; exit;
repeat until keyboard.getkeyeventchar(keyboard.getkeyevent())='g';
closegraph();
donekeyboard;
end.
5.ТЕСТУВАННЯ ТА НАЛАГОДЖЕННЯ.
Висновок: я засвоїв методику та виробив практичні навики застосування засобів графічного виводу інформації на прикладі побудови графічних позначень елементів радіоелектронних схем. Ознайомився з графічним модулем, та навчився будувати фігури.
Міністерство освіти і науки України
Національний університет «Львівська політехніка»
Інститут телекомунікацій, радіоелектроніки та електронної техніки
Кафедра теоретичної радіотехніки та радіовимірювань
ЗВІТ З ЛАБОРАТОРНОЇ РОБОТИ №12 НА ТЕМУ:
«ПОБУДОВА ГРАФІЧНИХ ПОЗНАЧЕНЬ ЕЛЕМЕНТІВ РАДІОЕЛЕКТРОННИХ СХЕМ»
Варіант №2
Підготував:
студент групи РТ-11
Баб’як Володимир
Прийняв:
Нестор Н. І.
Львів 2010 р.
27.04.2014 02:04-
Ділись своїми роботами та отримуй миттєві бонуси!
0%
Оголошення від адміністратора