Главная База знаний "Allbest" Программирование, компьютеры и кибернетика Разработка программного обеспечения "Телефонный справочник"

Разработка программного обеспечения "Телефонный справочник"

Характеристика работы Алтайского филиала телекоммуникаций "Сибирьтелеком". Разработка программы для автоматизации работы телефонного справочника. Основные функции программного продукта: хранение, обработка, ввод и редактирование информации об абонентах.

Рубрика Программирование, компьютеры и кибернетика
Вид дипломная работа
Язык русский
Дата добавления 07.06.2012
Размер файла 6,0 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Страница:

var n:string;

begin

if length(Edit_fio.Text)<>0 then

if (Edit_fio.Text[Length(Edit_fio.Text)]='1')or(Edit_fio.Text[Length(Edit_fio.Text)]='2')or

(Edit_fio.Text[Length(Edit_fio.Text)]='3')or(Edit_fio.Text[Length(Edit_fio.Text)]='4')or

(Edit_fio.Text[Length(Edit_fio.Text)]='5')or(Edit_fio.Text[Length(Edit_fio.Text)]='6')or

(Edit_fio.Text[Length(Edit_fio.Text)]='7')or(Edit_fio.Text[Length(Edit_fio.Text)]='8')or

(Edit_fio.Text[Length(Edit_fio.Text)]='9')or(Edit_fio.Text[Length(Edit_fio.Text)]='0')then

begin

ShowMessage('Вы не можете использовать цифры при вводе ФИО!');

n:=Edit_fio.Text;

delete(n,length(n),1);

Edit_fio.Text:=n;

end;

end;

procedure TF_red_chastnie.Edit_nomChange(Sender: TObject);

var n:string;

begin

if Length(Edit_nom.Text)<>0 then

if (Edit_nom.Text[Length(Edit_nom.Text)]='1')or(Edit_nom.Text[Length(Edit_nom.Text)]='2')or

(Edit_nom.Text[Length(Edit_nom.Text)]='3')or(Edit_nom.Text[Length(Edit_nom.Text)]='4')or

(Edit_nom.Text[Length(Edit_nom.Text)]='5')or(Edit_nom.Text[Length(Edit_nom.Text)]='6')or

(Edit_nom.Text[Length(Edit_nom.Text)]='7')or(Edit_nom.Text[Length(Edit_nom.Text)]='8')or

(Edit_nom.Text[Length(Edit_nom.Text)]='9')or(Edit_nom.Text[Length(Edit_nom.Text)]='0')or

(Edit_nom.Text[Length(Edit_nom.Text)]='-')then

else

begin

ShowMessage('Вы не можете использовать буквы при вводе номера!');

n:=Edit_nom.Text;

delete(n,length(n),1);

Edit_nom.Text:=n;

end;

end;

procedure TF_red_chastnie.Button1Click(Sender: TObject);

var n:string;

begin

if (Edit_fio.Text<>'')and(Edit_nom.Text<>'')and(length(Edit_nom.Text)=7)and(Edit_nom.Text[3]='-')and(Edit_nom.Text[5]='-')and(Edit_adr.Text<>'')and(ComboBox1.Text<>'')and(ComboBox2.Text<>'')then

begin

ADOQuery2.Locate('naimen',ComboBox2.Text,[]);

n:=ADOQuery2.FieldByName('kod').AsString;

ADOQuery3.SQL.Clear;

ADOQuery3.SQL.Add('update sprav_f set fio='+#39+Edit_fio.Text+#39+',nom='+#39+Edit_nom.Text+#39+',adres='+

#39+Edit_adr.Text+#39+',bonus='+#39+Edit_lg.Text+#39+',nas_punkt='+#39+ComboBox1.Text+#39

+',tarif='+n+' where kod='+F_Chastnie.ADOQuery1.FieldByName('kod').AsString);

ADOQuery3.ExecSQL;

F_Chastnie.ADOQuery1.Active:=false;

F_Chastnie.ADOQuery1.Active:=true;

F_Chastnie.Edit1.Text:='';

F_Chastnie.Edit2.Text:='';

F_Chastnie.Edit3.Text:='';

F_Chastnie.Edit4.Text:='';

close;

end

else ShowMessage('Вы ввели некоректные данные.');

end;

end.

unit U_red_organiz;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, DB, ADODB, StdCtrls, DBCtrls, jpeg, ExtCtrls;

type

TF_red_organiz = class(TForm)

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label5: TLabel;

Label6: TLabel;

Edit_fio: TEdit;

Edit_nom: TEdit;

Edit_adr: TEdit;

Button1: TButton;

Button2: TButton;

ADOQuery2: TADOQuery;

DataSource2: TDataSource;

ADOQuery3: TADOQuery;

ComboBox2: TComboBox;

ComboBox1: TComboBox;

procedure Edit_nomChange(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure FormShow(Sender: TObject);

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

F_red_organiz: TF_red_organiz;

implementation

uses U_Glavn, U_organiz;

{$R *.dfm}

procedure TF_red_organiz.Edit_nomChange(Sender: TObject);

var n:string;

begin

if Length(Edit_nom.Text)<>0 then

if (Edit_nom.Text[Length(Edit_nom.Text)]='1')or(Edit_nom.Text[Length(Edit_nom.Text)]='2')or

(Edit_nom.Text[Length(Edit_nom.Text)]='3')or(Edit_nom.Text[Length(Edit_nom.Text)]='4')or

(Edit_nom.Text[Length(Edit_nom.Text)]='5')or(Edit_nom.Text[Length(Edit_nom.Text)]='6')or

(Edit_nom.Text[Length(Edit_nom.Text)]='7')or(Edit_nom.Text[Length(Edit_nom.Text)]='8')or

(Edit_nom.Text[Length(Edit_nom.Text)]='9')or(Edit_nom.Text[Length(Edit_nom.Text)]='0')or

(Edit_nom.Text[Length(Edit_nom.Text)]='-')then

else

begin

ShowMessage('Вы не можете использовать буквы при вводе номера!');

n:=Edit_nom.Text;

delete(n,length(n),1);

Edit_nom.Text:=n;

end;

end;

procedure TF_red_organiz.Button1Click(Sender: TObject);

begin

if (Edit_fio.Text<>'')and(Edit_adr.Text<>'')and(Edit_nom.Text<>'')and

(ComboBox1.Text<>'')and(ComboBox2.Text<>'')then

begin

ADOQuery3.SQL.Clear;

ADOQuery2.Locate('naimen',ComboBox2.Text,[]);

ADOQuery3.SQL.Add('update sprav_u set naimen='+#39+Edit_fio.Text+#39+',nom='+#39+Edit_nom.Text+#39+',adres='

+#39+Edit_adr.Text+#39+',nas_punkt='+#39+ComboBox1.Text+#39+',tarif='+

ADOQuery2.FieldByName('kod').AsString+' where kod='+F_Organiz.ADOQuery1.FieldByName('kod').AsString);

ADOQuery3.ExecSQL;

F_Organiz.ADOQuery1.Active:=false;

F_Organiz.ADOQuery1.Active:=true;

close;

end

else ShowMessage('Вы ввели не все данные!');

end;

procedure TF_red_organiz.FormShow(Sender: TObject);

begin

Edit_fio.Text:=F_Organiz.ADOQuery1.FieldByname('naimen').AsString;

Edit_nom.Text:=F_Organiz.ADOQuery1.FieldByname('nom').AsString;

Edit_adr.Text:=F_Organiz.ADOQuery1.FieldByname('adres').AsString;

ComboBox1.Text:=F_Organiz.ADOQuery1.FieldByName('nas_punkt').AsString;

ADOQuery2.First;

ComboBox2.Items.Clear;

while not ADOQuery2.Eof do

begin

ComboBox2.Items.Add(ADOQuery2.FieldByName('naimen').AsString);

ADOQuery2.Next;

end;

ADOQuery2.Locate('kod',F_Organiz.ADOQuery1.FieldByName('tarif').AsString,[]);

ComboBox2.Text:=ADOQuery2.FieldByName('naimen').AsString;

end;

procedure TF_red_organiz.Button2Click(Sender: TObject);

begin

close

end;

end.

unit U_red_tarif;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, DB, ADODB, StdCtrls;

type

TF_red_tarif = class(TForm)

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

Label5: TLabel;

Edit_tar: TEdit;

Edit_ab_f: TEdit;

Edit_ab_u: TEdit;

Edit_min_f: TEdit;

Edit_min_u: TEdit;

Button1: TButton;

Button2: TButton;

ADOQuery1: TADOQuery;

procedure FormShow(Sender: TObject);

procedure Edit_ab_fChange(Sender: TObject);

procedure Edit_ab_uChange(Sender: TObject);

procedure Edit_min_fChange(Sender: TObject);

procedure Edit_min_uChange(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

F_red_tarif: TF_red_tarif;

implementation

uses U_Glavn, U_Tarif, U_red_organiz, U_red_chastnie, U_dob_organiz, U_dob_chastnie;

{$R *.dfm}

procedure TF_red_tarif.FormShow(Sender: TObject);

begin

Edit_tar.Text:=F_Tarif.ADOQuery1.FieldByName('naimen').AsString;

Edit_ab_f.Text:=F_Tarif.ADOQuery1.FieldByName('ab_f').AsString;

Edit_ab_u.Text:=F_Tarif.ADOQuery1.FieldByName('ab_u').AsString;

Edit_min_f.Text:=F_Tarif.ADOQuery1.FieldByName('min_f').AsString;

Edit_min_u.Text:=F_Tarif.ADOQuery1.FieldByName('min_u').AsString;

end;

procedure TF_red_tarif.Edit_ab_fChange(Sender: TObject);

var n:string;

begin

if Length(Edit_ab_f.Text)<>0 then

if (Edit_ab_f.Text[Length(Edit_ab_f.Text)]='1')or(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='2')or

(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='3')or(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='4')or

(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='5')or(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='6')or

(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='7')or(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='8')or

(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='9')or(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='0')or

(Edit_ab_f.Text[Length(Edit_ab_f.Text)]='.')then

else

begin

ShowMessage('Вы не можете использовать буквы при вводе!');

n:=Edit_ab_f.Text;

delete(n,length(n),1);

Edit_ab_f.Text:=n;

end;

if Edit_ab_f.Text='' then Edit_ab_f.Text:='0';

end;

procedure TF_red_tarif.Edit_ab_uChange(Sender: TObject);

var n:string;

begin

if Length(Edit_ab_u.Text)<>0 then

if (Edit_ab_u.Text[Length(Edit_ab_u.Text)]='1')or(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='2')or

(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='3')or(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='4')or

(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='5')or(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='6')or

(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='7')or(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='8')or

(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='9')or(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='0')or

(Edit_ab_u.Text[Length(Edit_ab_u.Text)]='.')then

else

begin

ShowMessage('Вы не можете использовать буквы при вводе!');

n:=Edit_ab_u.Text;

delete(n,length(n),1);

Edit_ab_u.Text:=n;

end;

if Edit_ab_u.Text='' then Edit_ab_u.Text:='0';

end;

procedure TF_red_tarif.Edit_min_fChange(Sender: TObject);

var n:string;

begin

if Length(Edit_min_f.Text)<>0 then

if (Edit_min_f.Text[Length(Edit_min_f.Text)]='1')or(Edit_min_f.Text[Length(Edit_min_f.Text)]='2')or

(Edit_min_f.Text[Length(Edit_min_f.Text)]='3')or(Edit_min_f.Text[Length(Edit_min_f.Text)]='4')or

(Edit_min_f.Text[Length(Edit_min_f.Text)]='5')or(Edit_min_f.Text[Length(Edit_min_f.Text)]='6')or

(Edit_min_f.Text[Length(Edit_min_f.Text)]='7')or(Edit_min_f.Text[Length(Edit_min_f.Text)]='8')or

(Edit_min_f.Text[Length(Edit_min_f.Text)]='9')or(Edit_min_f.Text[Length(Edit_min_f.Text)]='0')or

(Edit_min_f.Text[Length(Edit_min_f.Text)]='.')then

else

begin

ShowMessage('Вы не можете использовать буквы при вводе!');

n:=Edit_min_f.Text;

delete(n,length(n),1);

Edit_min_f.Text:=n;

end;

if Edit_min_f.Text='' then Edit_min_f.Text:='0';

end;

procedure TF_red_tarif.Edit_min_uChange(Sender: TObject);

var n:string;

begin

if Length(Edit_min_u.Text)<>0 then

if (Edit_min_u.Text[Length(Edit_min_u.Text)]='1')or(Edit_min_u.Text[Length(Edit_min_u.Text)]='2')or

(Edit_min_u.Text[Length(Edit_min_u.Text)]='3')or(Edit_min_u.Text[Length(Edit_min_u.Text)]='4')or

(Edit_min_u.Text[Length(Edit_min_u.Text)]='5')or(Edit_min_u.Text[Length(Edit_min_u.Text)]='6')or

(Edit_min_u.Text[Length(Edit_min_u.Text)]='7')or(Edit_min_u.Text[Length(Edit_min_u.Text)]='8')or

(Edit_min_u.Text[Length(Edit_min_u.Text)]='9')or(Edit_min_u.Text[Length(Edit_min_u.Text)]='0')or

(Edit_min_u.Text[Length(Edit_min_u.Text)]='.')then

else

begin

ShowMessage('Вы не можете использовать буквы при вводе!');

n:=Edit_min_u.Text;

delete(n,length(n),1);

Edit_min_u.Text:=n;

end;

if Edit_min_u.Text='' then Edit_min_u.Text:='0';

end;

procedure TF_red_tarif.Button2Click(Sender: TObject);

begin

close

end;

procedure TF_red_tarif.Button1Click(Sender: TObject);

begin

if Edit_tar.Text<>'' then

begin

ADOQuery1.SQL.Clear;

ADOQuery1.SQL.Add('update tarif set naimen='+#39+Edit_tar.Text+#39+',[ab_f]='+#39+Edit_ab_f.Text+#39

+',[ab_u]='+#39+Edit_ab_u.Text+#39+',[min_f]='+#39+Edit_min_f.Text+#39+',[min_u]='+#39+Edit_min_u.Text+#39

+' where kod='+F_Tarif.ADOQuery1.FieldByName('kod').AsString);

ShowMessage(ADOQuery1.SQL.CommaText);

ADOQuery1.ExecSQL;

F_Tarif.ADOQuery1.Active:=false;

F_Tarif.ADOQuery1.Active:=true;

F_red_organiz.ADOQuery2.Active:=false;

F_red_organiz.ADOQuery2.Active:=true;

F_red_chastnie.ADOQuery2.Active:=false;

F_red_chastnie.ADOQuery2.Active:=true;

F_dob_organiz.ADOQuery2.Active:=false;

F_dob_organiz.ADOQuery2.Active:=true;

F_dob_chastnie.ADOQuery2.Active:=false;

F_dob_chastnie.ADOQuery2.Active:=true;

close;

end

else ShowMessage('Введите наименование тарифа!');

end;

end.

unit U_svedenia;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, jpeg, ExtCtrls;

type

TF_svedenia = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

Image1: TImage;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

F_svedenia: TF_svedenia;

implementation

uses U_Tarif, U_Gurnal;

{$R *.dfm}

procedure TF_svedenia.Button1Click(Sender: TObject);

begin

F_Tarif.Show

end;

procedure TF_svedenia.Button2Click(Sender: TObject);

begin

F_gurnal.show

end;

procedure TF_svedenia.Button3Click(Sender: TObject);

begin

close

end;

end.

unit U_Tarif;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, DB, ADODB, StdCtrls, ExtCtrls, DBCtrls, Grids, DBGrids, ComObj,

jpeg;

type

TF_Tarif = class(TForm)

ADOQuery1: TADOQuery;

DataSource1: TDataSource;

DBGrid1: TDBGrid;

DBNavigator1: TDBNavigator;

GroupBox1: TGroupBox;

Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

Button5: TButton;

Image1: TImage;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure FormCreate(Sender: TObject);

procedure Button4Click(Sender: TObject);

procedure Button5Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

F_Tarif: TF_Tarif;

XL:variant;

MyDir:string;

implementation

uses U_Glavn, U_dob_tarif, U_red_chastnie, U_del_chastnie, U_red_tarif,

U_del_tarif;

{$R *.dfm}

procedure TF_Tarif.Button1Click(Sender: TObject);

begin

F_dob_tarif.Show

end;

procedure TF_Tarif.Button2Click(Sender: TObject);

begin

F_red_tarif.Show

end;

procedure TF_Tarif.Button3Click(Sender: TObject);

begin

F_del_tarif.Show

end;

procedure TF_Tarif.FormCreate(Sender: TObject);

begin

GetDir(0,MyDir);

end;

procedure TF_Tarif.Button4Click(Sender: TObject);

var i:integer;

begin

XL:=CreateOleObject('Excel.Application');

XL.DisplayAlerts:=false;

XL.WorkBooks.Open(MyDir + '\Тарифы.xls');

XL.WorkBooks[1].WorkSheets[1].Cells[2,5]:=datetostr(date);

ADOQuery1.First;

i:=4;

while not ADOQuery1.Eof do

begin

XL.WorkBooks[1].WorkSheets[1].Cells[i,1]:=ADOQuery1.FieldByName('naimen').AsString;

XL.WorkBooks[1].WorkSheets[1].Cells[i,2]:=ADOQuery1.FieldByName('ab_f').AsString;

XL.WorkBooks[1].WorkSheets[1].Cells[i,3]:=ADOQuery1.FieldByName('min_f').AsString;

XL.WorkBooks[1].WorkSheets[1].Cells[i,4]:=ADOQuery1.FieldByName('ab_u').AsString;

XL.WorkBooks[1].WorkSheets[1].Cells[i,5]:=ADOQuery1.FieldByName('min_u').AsString;

i:=i+1;

ADOQuery1.Next;

end;

XL.Visible:=true;

end;

procedure TF_Tarif.Button5Click(Sender: TObject);

begin

close

end;

end.

unit U_Razrab;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, Buttons, jpeg, ExtCtrls;

type

TF_Razrab = class(TForm)

BitBtn1: TBitBtn;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

procedure BitBtn1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

F_Razrab: TF_Razrab;

implementation

{$R *.dfm}

procedure TF_Razrab.BitBtn1Click(Sender: TObject);

begin

close

end;

end.

Приложение В (связь программных модулей)

Рисунок В-1

Приложение Г (сводные документы)

Рисунок Г-1

Рисунок Г-2

Рисунок Г-3

Рисунок Г-4

Рисунок Г-5

Рисунок Г-6

Рисунок Г-7

Размещено на Allbest.ru

Страница:


Подобные документы

  • Алгоритмический язык Pascal. Программа "Телефонный справочник"

    Использование электронно-вычислительной техники для сбора, накопления, обработки и передачи информации. Разработка программы "Телефонный справочник" на Паскале: ввод и редактирование теста программы, трансляция и отладка. Блок-схема, листинг программы.

    контрольная работа [61,2 K], добавлен 26.06.2010

  • Программа "Словарь" (телефонный справочник)

    Разработка программы на языке программирования C++ с функциями считывания словаря в начале работы программы из текстового файла и записи словаря в файл перед завершением работы. Основные элементы программного продукта: данные абонента телефонной сети.

    контрольная работа [12,9 K], добавлен 07.04.2015

  • Разработка программного обеспечения для складского учета

    Разработка программного продукта для обеспечения стабильной работы заведующего складом Барановичского хлебозавода, обеспечивающего хранение и обработку информации складского учета, поиск объекта технических ресурсов, анализ и мониторинг его движения.

    дипломная работа [2,5 M], добавлен 06.06.2012

  • Телефонный справочник

    Разработка компьютерной программы - автоматического телефонного спавочника. Описание алгоритма программы. Описание последовательности действия при составлении и редактировании базы данных. Основные операторы и группы операторов. Анализ программы.

    курсовая работа [21,7 K], добавлен 29.10.2008

  • Разработка программного обеспечения для автоматизации банковских услуг

    Анализ проектирования интерфейса программы. Выбор и назначение визуальных компонентов. Изучение экранных форм приложения. Модули, процедуры, функции проекта и их назначение. Листинг программного кода. Результаты работы автоматизированного продукта.

    курсовая работа [1,9 M], добавлен 11.12.2017

  • Разработка программного средства "Профориентация"

    Рассмотрение приемов разработки программных средств для автоматизированных систем обработки информации и управления. Разработка программного продукта, предназначенного для автоматизации работы заместителя директора по учебно-воспитательной работе.

    дипломная работа [1,7 M], добавлен 27.02.2015

  • Справочник стран мира и городов

    Теоретические основы разработки программного обеспечения. Рассмотрение языков и среды программирования. Разработка программного продукта "Справочник стран мира и городов"; описание интерфейса. Составление терминологического словаря, диаграммы модуля.

    курсовая работа [1,5 M], добавлен 09.08.2015

  • Разработка программного продукта для автоматизации работы администратора турфирмы

    Офисные программы, необходимые для автоматизации работы турфирмы. Описание входной и выходной информации, структуры базы данных. Аппаратное и программное средства для функционирования автоматизированной информационной системы, ее работоспособность.

    курсовая работа [902,2 K], добавлен 02.05.2017

  • Разработка системы электронного документооборота в Управлении Федерального казначейства

    Обоснование выбора языка программирования. Анализ входных и выходных документов. Логическая структура базы данных. Разработка алгоритма работы программы. Написание программного кода. Тестирование программного продукта. Стоимость программного продукта.

    дипломная работа [1008,9 K], добавлен 13.10.2013

  • Разработка программы по учету покупок

    Разработка программного обеспечения для работы с информацией и ее обработкой на языке программирования Delphi. Описание алгоритмов процедуры работы со стеком - добавление, удаление элементов, редактирование записи. Инструкция по использованию программы.

    курсовая работа [2,9 M], добавлен 06.02.2013

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.

© 2000 — 2023, ООО «Олбест» Все права защищены