Запустите программу Microsoft Access (Пуск — Программы — Microsoft Office — Microsoft Access).
2. В окне Microsoft Access включите переключатель Новая база данных.
На боковой панели выберите место, где будет храниться база данных, дайте файлу имя: Комплектующие. Убедитесь, что в качестве типа файла выбрано Базы данных Microsoft Access и щелкните по кнопке Создать. В результате на экране должно появиться окно новой базы данных. Автоматически будет запущен режим создания первой таблицы:Перейти из режима таблицы в режим конструктора, выбрав его в меню:
Когда программа запросит имя таблицы, ввести название: Комплектующие и нажать Ok. Откроется окно конструктора, в котором мы будем создавать структуру таблицы:
Var A,B,C:integer; Begin C:=365; Read(A,B); if A>1 then C:=C-31; if A=1 then C:=C-B; if A>2 then C:=C-28; if A=2 then C:=C-B; if A>3 then C:=C-31; if A=3 then C:=C-B; if A>4 then C:=C-30; if A=4 then C:=C-B; if A>5 then C:=C-31; if A=5 then C:=C-B; if A>6 then C:=C-30; if A=6 then C:=C-B; if A>7 then C:=C-31; if A=7 then C:=C-B; if A>8 then C:=C-31; if A=8 then C:=C-B; if A>9 then C:=C-30; if A=9 then C:=C-B; if A>10 then C:=C-31; if A=10 then C:=C-B; if A>11 then C:=C-30; if A=11 then C:=C-B; if A>12 then C:=C-31; if A=12 then C:=C-B; Write(C); End.
Запустите программу Microsoft Access (Пуск — Программы — Microsoft Office — Microsoft Access).
2. В окне Microsoft Access включите переключатель Новая база данных.
На боковой панели выберите место, где будет храниться база данных, дайте файлу имя: Комплектующие. Убедитесь, что в качестве типа файла выбрано Базы данных Microsoft Access и щелкните по кнопке Создать. В результате на экране должно появиться окно новой базы данных. Автоматически будет запущен режим создания первой таблицы:Перейти из режима таблицы в режим конструктора, выбрав его в меню:
Когда программа запросит имя таблицы, ввести название: Комплектующие и нажать Ok. Откроется окно конструктора, в котором мы будем создавать структуру таблицы: