4 Інструкція для роботи з програмою
Зазначити, які ресурси необхідні для роботи програми, що необхідно зробити для запуску програми на виконання, дати чіткі вказівки, як необхідно відповідати на запити програми.
Наприклад:
Для запуску програми необхідно запустити файл kursova.exe . Після запуску файлу з’являється заставка програми, при натисненні будь-якої клавіші з’являється меню. В меню обираємо необхідний пункт за допомогою введення відповідного номера і натискаємо ENTER.
-
Приклади тестування та результати роботи програми
Графічний інтерфейс на початку програми:
Основна програма, вигляд меню:
Виведення
даних на екран:
Пошук студентів факультету по номеру курса:
Результати пошуку студентів в процентному відношенні:
Сортування за віком, пошук найстаршого студента:
Редагування
файлу записів:
Редагування існуючого запису:
Додавання нового запису:
Видалення запису за вказаним номером:
Графічний
інтерфейс в кінці програми:
Висновки
Виконавши курсовий проект, я придбала навички роботи в середовищі програмування Turbo Pascal, ознайомилась з елементами мови: типи даних і графіка у Паскалі, а також створила програму використовуючи свої навички. Також підвела підсумки, що Turbo Pascal є гнучкою та алгоритмічною мовою програмування, і добре підходить як для початківця так і для досвідченого програміста. Широкий набір підпрограм та модульність дозволяє швидко та якісно створювати програмний продукт.
Література
1. Глинський Я.М., Анохін В.Є., Ряжська В.А. Паскаль. Turbo Pascal і Delphi. Навч.
посібн. 5-те доп. вид. – Львів: Деол, СПД Глинський, 2004. – 176 с.
2. Ковалюк Т.В. Основи програмування. – К.: Видавнича група BHV, 2005. – 384c.: іл.
3. Коффман Эллиот Б. Turbo Pascal. Практикум 5-е издание.: пер. с англ. М.:
Издательский дом "Вильямс", 2005. – 896 с.: ил.
4. Марченко А.И., Марченко Л.А. Програмирование в среде Turbo Pascal 7.0 / Марченко
А.И., Марченко Л.А.: Под ред. Таресенко В.П. – 9-е изд. – К.:Век+, СПб.: КОРОНА-
Век, 2007. – 464 с.: ил.
5. Семотюк В. Програмування в середовищі Турбо Паскаль. Львів: БаК, 2000. – 248 с.
Додаток а (Обов’язковий) Лістинг основної програми
{$R-}
uses Crt, Graphika, Navchannia, Finder;
type students=record
prizv: string[20];
name: string[15];
po_batkovi: string[20];
stat: char;
vik: integer;
kurs: 1..7;
end;
st=array[1..50] of students;
var n:integer;
s: st;
begin
Privetstvie;
Mywork;
assign(f,'students.dat');
while n<8 do
begin
textbackground(13);
clrscr;
textcolor(10);
gotoxy(20,8); writeln(' --------------------------------- ');
gotoxy(20,19); writeln(' -------------------------------');
gotoxy(55,9); writeln('|');
gotoxy(55,10); writeln('|');
gotoxy(55,11); writeln('|');
gotoxy(55,12); writeln('|');
gotoxy(55,13); writeln('|');
gotoxy(55,14); writeln('|');
gotoxy(55,15); writeln('|');
gotoxy(55,16); writeln('|');
gotoxy(55,17); writeln('|');
gotoxy(55,18); writeln('|');
gotoxy(20,9); writeln('|');
gotoxy(20,10);
writeln ('| 1..Vvod');
gotoxy(20,11);
writeln('| 2..Vyvod');
gotoxy(20,12);
writeln('| 3..Poisk kolichestva');
gotoxy(20,13);
writeln('| 4..Poisk naistarshego');
gotoxy(20,14);
writeln('| 5..Redaktirovanie');
gotoxy(20,15);
writeln('| 6..Udalenie');
gotoxy(20,16);
writeln('| 7..Vyhod');
gotoxy(20,17); writeln('|');
gotoxy(20,18); writeln('|');
gotoxy(28,18);
writeln('-->');
gotoxy(32,18);
repeat
readln(n);
until n in [1..7];
case n of
1: begin Vvod; end;
2: begin Vyvod; end;
3: begin Poisk1; end;
4: begin Poisk2; end;
5: begin Redaktirovanie; end;
6: begin Delete; end;
7: Konets;
end;
n:=n+1;
end;
end.