Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
практика програмування.doc
Скачиваний:
24
Добавлен:
16.05.2015
Размер:
580.61 Кб
Скачать

Виконання роботи:

  • управління екраном , звуком, клавіатурою­– модуль CRT;

  • процедури і функції графіки – модуль GRAPH;

  • ініціалізація графічного режиму;

  • скласти програму згідно варіанть, забезпечити музичний супровід при виконанні програми.

№ вар.

побудувати фігуру, підписати, вказавши назву і виконавця

парусник

сніговика

вазу

потяг

табуретку

вікно

зоряне небо з місяцем

квітку

літак

годинник

сонце з променнями

автомобіль

будинок

парусник

стіл з стільцем

  • Налагодити порограму;

  • Оформити звіт.

Оформити звіт.

Тема.

Мета.

Постановка задачі.Програма.

Результати роботи.Висновки.

Практична робота №13.

ТЕМА: ПРОГРАМУВАННЯ МОДУЛІВ КОРИСТУВАЧА.

МЕТА: Набути навиків програмування модулів з використанням

стандартних підпрограм ,створення бібліотеки власних

модулів та підключення їх до основної програми.

ЗАВДАННЯ ДЛЯ САМОСТIЙНОЇ ПIДГОТОВКИ

1.Вивчити структуру оформлення модуля.

2.Вивчити способи звертання до стандартних підпрограм.

3.Визначити сукупність підпрограм власного модуля.

4.Скласти програму для розв"язання задачі з використанням

підпрограм створеного власного модуля.

ВИКОНАННЯ РОБОТИ

1. СКЛАСТИ МОДУЛЬ МАТЕМАТИЧНИХ ПРОЦЕДУР ТА ФУНКЦІЙ ТА ВВЕСТИ В ЕОМ , НАЛАГОДИТИ ЙОГО.

2.ВВЕСТИ ПРОГРАМУ З ВИКОРИСТАННЯМ ПІДПРОГРАМ СТВОРЕНОГО МУДУЛЯ В ЕОМ , НАЛАГОДИТИ ЇЇ.

ПРИКЛАД МОДУЛЯ:

UNIT VicArt;

INTERFACE

FUNCTION ART(X:REAL):REAL;

PROCEDURE AGS(K,L:integer) ;

IMPLEMENTATION

FUNCTION ART(X:REAL):REAL;

BEGIN

ART:= 2*X+5- ABS(X);

END;

PROCEDURE AGS(K,L:integer) ;

VAR A:Integer;

BEGIN

FOR A:=K TO L DO WRITELN('A=',A,' КВ.числа А=',SQR(A));

END;

BEGIN { пустий роздiл iнiцiалiзацi• } END.

ОСНОВНА ПРОГРАМА :

PROGRAM MGVP;

USES VicArt,Crt;

BEGIN

Clrcrt; { очищення екрану }

WRITELN('РЕЗУЛЬТАТ=',ART(20.5)); { вивiд результатiв FUNCTION}

AGS(3,10); { звертання до PROCEDURE модуля VicArt }

END.

МЕТОДИЧНІ ВКАЗІВКИ.

В модуль необхідно записати підпрограми, які відсутні в стандартній бібліотеці ПАСКАЛЯ:

1.Функцію піднесення в цілу додатню степінь;

2.Функцію обчислення факторіала;

3.Процедуру обчислення тангенса;

4.Процедуру обчислення котангенса.

5.Десяткового логарифму.

В основній програмі забезпечити звертання до підпрограм власного модуля.

Вираз для обчислення вибрати самостійно.

Вивести результати обчислень.

3.Оформити звіт до роботи.

  1. Тема.

  2. Мета.

  3. Постановка задачі.

  4. Текст модуля.

  5. Програма.

  6. Результати роботи.

  7. Висновки.

Практична робота № 14

ТЕМА: ПРОГРАМУВАННЯ ЗАДАЧ З ВИКОРИСТАННЯМ АСЕМБЛЕРА

МЕТА: Навчитись з’єднувати програму на мові ПАСКАЛЬ з АСЕМБЛЕРНИМИ вставками, програмувати задачі з використанням можливостей АСЕМБЛЕРА.