Реферат Програма обробки економічної інформації

Тема: Курсовые обзорные

DOS EXE, що є прийнятним розміром для програм такого типу.

Для виконання потрібно процесор класу 286. p align="justify"> Програма може працювати під управлінням операційної системи класу DOS, при цьому зберігає працездатність і в режимі емуляції MS-DOS операційною системою Windows 9x. p align="justify"> Таким чином, програма може виконуватися практично на будь-якому доступному PC комп'ютері.

Висновок

Дана програма, складена відповідно до постановкою завдання на курсове проектування за темою "Програма обробки відомості про роботу співробітників" з дисципліни "Основи програмування та алгоритмічні мови" (ОПіАЯ). При написанні програми використано методичні вказівки по курсовому проектуванню з дисципліни "ОПіАЯ". Для перевірки працездатності програми і правильності обробки вхідних даних розроблено тестовий приклад. Тестування програми підтвердило, що програма правильно виконує обробку даних і видає вірні результати. Все це свідчить про працездатність програми і дозволяє зробити висновок про придатність програми до вирішення практичних завдань з обробки економічної інформації. br/>

Додаток 1

Текст програми

uses dos, crt;

type = ^ Ttabl; = [1 .. 50] of 1;: = left; c <> n do (c);: = el ^. Next;;: = el;; inttostr (i: longint): string;: string [11]; (i, s); : = S;; strtoint (s: string): longint;, code: integer; s [1] = '' do delete (s, 1,1); s [length (s)] = '' do delete (s , length (s), 1); (s, i, code);: = i;; flip (var t1, t2: ptabl);: tablinf;: = t1 ^. inf; ^. inf: = t2 ^. inf; ^. inf: = d;; sort (t: integer);, temp2: ptabl;, i, j: integer;: = 1; i: = 1 to count doj: = 1 to count do begin: = getp (i);: = getp (j); s = 2 thent of

: if temp1 ^. inf.grup> temp2 ^. inf.grup then flip (temp1, temp2);

: if temp1 ^. inf.predm> temp2 ^. inf.predm then flip (temp1, temp2);

: if temp1 ^. inf.otl> temp2 ^. inf.otl then flip (temp1, temp2);

: if temp1 ^. inf.hor> temp2 ^. inf.hor then flip (temp1, temp2);

: if temp1 ^. inf.ud> temp2 ^. inf.ud then flip (temp1, temp2);

: if temp1 ^. inf.neud> temp2 ^. inf.neud then flip (temp1, temp2);

: if temp1 ^. inf.plec> temp2 ^. inf.plec then flip (temp1, temp2);

: if temp1 ^. inf.pprak> temp2 ^. inf.pprak then flip (temp1, temp2); elses = 1 thent of

: if temp1 ^. inf.grup

: if temp1 ^. inf.predm

: if temp1 ^. inf.otl

: if temp1 ^. inf.hor