Цифровой офис
Документы:
Реферат — разместите документ на отдельной странице Вашего сайта.
3. Задания MS Office PowerPoint.
4. VBA.
5. Создаем xml-файл на Паскале.
6. Читаем и разбираем xml-файл на Паскале.
7. Создаем, читаем и разбираем xml-файл на Lazarus.
Задания
1. Выполните задания из приведенных выше документов
в программном пакете MS Office.
2. Выполните задания из приведенных выше документов
в программном пакете OpenOffice.org.
3. Выполните задания по текстовому редактору в документе Реферат и разместите документ на отдельной странице Вашего сайта.
5. Для выполненных в OpenOffice.org заданий создайте скриншоты и разместите галерею снимков экрана на отдельной странице Вашего сайта.
Пример создания макросов в OpenOffice.org
Задания MS Office Word
Создайте документ, содержащий заголовки разных уровней. Выполните расстановку номеров страниц и создайте оглавление.
Создайте документ, содержащий несколько колонок текста. Выполните расстановку номеров страниц. Вставьте колонтитулы, верхний - содержит название учебного заведения, нижний название документа.
Создайте документ, содержащий таблицу со списком канцтоваров, их ценой и количеством. Произведите вычисления стоимости товаров по наименованию и суммарную стоимость.
Создайте документ, содержащий абзац текста и 2 рисунка. Один рисунок из коллекции картинок, второй создайте с помощью инструментов панели “Рисование”.
Создайте и сохраните шаблон для документа «Справка». Создайте документ на основе этого шаблона.
Создать макрос в MS Word. Макрос выполняет следующие действия::выделенный фрагмент текста выровнять по ширине страницы, отступ красной строки 1,25 см, междустрочный интервал-полуторный.Назначить макросу кнопку и комбинацию клавиш.
Создать макрос в MS Word. Макрос выполняет следующие действия : шрифт выделенного фрагмента текста - Arial , начертание - курсив, размер шрифта - 14 пт , цвет текста - красный. Назначить макросу кнопку и комбинацию клавиш.
Создать макрос MS Word. Макрос выполняет следующие действия: установить выделенному фрагменту текста стиль - заголовок 2 уровня, шрифт - Verdana, размер шрифта - 16 пт, выравнивание - по середине страницы, отступ перед абзацем 24 пт, после 12 пт. Назначить макросу кнопку и комбинацию клавиш.
Создать макрос в MS Word. Макрос выполняет следующие действия: вставляет номера страниц, номер вверху страницы, выровнен по левому краю, нумерация римскими цифрами. Назначить макросу кнопку и комбинацию клавиш.
Создайте макрос в MS Word. Макрос выполняет следующие действия: вставляет таблицу из 4 столбцов и 5 строк, ширина первого столбца 6 см, остальных - 2 см, границы таблицы - двойная линия. Назначить макросу кнопку и комбинацию клавиш.
Реферат
Очистка стиля.
Форматирование (размер – 14, шрифт – Times New Roman, интервал – 1,5, перед и после – 0, начертание – жирный, курсив).
Абзационный отступ (1,25) (с помощью линейки, клавиши TAB, в меню)
Выравнивание (по ширине, заголовки по центру)
Удаление автоматических ссылок (вставка).
Поля (установление размера: верхнее и правое – 2 см., левое – 3 см., нижнее – 2,5 см.).
Ориентация листов - книжная.
Разрывы (разделов и страниц).
Вставить пустую страницу в начале документа.
Работа с непечатными символами. Отобразить непечатные символы.
Изменение регистра.
Поиск, замена.
Автоматическая нумерация страниц и отдельный номер для первой страницы.
Автоматическое оглавление.
Задания MS Office Excel
В Excel создайте печатную форму “Квитанция” с возможностью быстрого заполнения.
С помощью инструмента “Подбор параметра” решите уравнение (x-5)*(x+10)*x=3. С помощью графика проверьте правильность решения.
Найти минимальное значение функции (x1-5)^2 + x2^2 при ограничениях x1 ≥ 0; x2 ≥ x1 + 2; x2 ≤ 2 * x1 + 4 с помощью инструмента «Поиск решения».
Создайте и сохраните шаблон для документа “ведомость на выплату стипендии”. Создайте документ на основе этого шаблона.
Создайте таблицу успеваемости студентов по 2 предметам. Отсортируйте таблицу по алфавиту в прямом и обратном порядке. С помощью инструмента “Автофильтр” выберите всех отличников и всех неуспевающих.
Создать макрос в MS Excel. Макрос выполняет следующие действия: у выделенного фрагмента изменить формат ячеек. Формат - число, 3 знака после запятой, размер шрифта - 12 пт, граница ячеек - сплошная линия.
Создать макрос в MS Excel. Макрос выполняет следующие действия: у выделенного фрагмента изменить формат ячеек. Формат - денежный, шрифт Times New Roman, полужирный, размер шрифта - 14 пт, граница ячеек - пунктирная линия.
Создать макрос в MS Excel. Макрос выполняет следующие действия: вставляет новый лист. На нем в первом столбце список из 3 фамилий, в первой строке - дни недели (понедельник - воскресенье).
Создать макрос в MS Excel. Макрос выполняет следующие действия: вставляет новый лист. На нем в первом столбце годы (2000 - 2008), в первой строке - месяцы (январь - декабрь).
Создать макрос в MS Excel. Макрос выполняет следующие действия: вставляет в ячейку A1 логотип организации (любой рисунок). Ячейки B1-E1 объединить и вставить название организации, ячейки B2-E2 объединить и вставить адрес и телефон организации.
Задания MS Office PowerPoint
В Power Point создайте и сохраните шаблон для документа “Отчет по производственной практике”. Создайте документ на основе этого шаблона.
Продемонстрируйте возможность использования в презентации данных из других программ MS Office. для этого разместите в презентации рисунок, созданный в Word, таблицу и график, созданные в Excel.
Продемонстрируйте возможность использования в презентации различных эффектов оформления и элементов управления.
Создайте макрос в MS PowerPoint. Макрос вставляет на слайд в левый верхний угол - название огранизации, в правый верхний угол - логотип (любой рисунок), в правый нижний угол - адрес и телефон. Назначить макросу кнопку на панели инструментов.
Создайте макрос в MS PowerPoint. Макрос вставляет новый слайд с информацией о студенте: фото (любой рисунок), ФИО, специальность, номер группы. Назначить макросу кнопку на панели инструментов.
Создайте макрос в MS PowerPoint. Макрос вставляет новый слайд с таблицей. Таблица из 4 столбцов и 4 строк, в первом столбце - список студентов, в первой строке - название предметов. Назначить макросу кнопку на панели инструментов.
Создаем xml-файл на Паскале
uses crt; var f:text; s:string; begin clrscr; {jnkrivaem fail dly zapisi} assign(f,'c:\out.xml'); rewrite(f); {zagolovok xml faila} writeln(f, '<?xml version="1.0" standalone="yes"?>'); {osnovnaya chast dokumenta} writeln(f,'<body>'); write('familiya: ');readln(s); writeln(f,'<fam>',s,'</fam>'); write('imya: ');readln(s); writeln(f,'<imya>',s,'</imya>'); write('otchestvo: ');readln(s); writeln(f,'<oth>',s,'</oth>'); {/osnovnaya chast dokumenta} writeln(f,'<body>'); {zakrivaem fail} close(f); readln; end.
Читаем и разбираем xml-файл
user crt; var f:text; s,c:string; i,j,l:integer; begin clrscr; {otktivaem fail dly chteniya} assign(f,'c:\out.xml'); reset(f); {chitaem xml fail} while not (eof(f)) do begin readln(f,s); if s<>'<?xml version="1.0" standalone="yes"?>' then begin {chitaem osnovnyu chast dokumenta} if pos('<fam>',s)>0 then begin i:=pos('<fam>',s)+5; j:=pos('<fam>',s); l:=j-i; c:=copy(s,i,l); writeln('familia: ',c); end; if pos ('<imya>',s)>0 then begin i:=pos('<imya>',s)+6; j:=pos('</imya>',s); l:=j-i; c:=copy(s,i,l); writeln('imya: ',c); end; if pos ('<oth>',s) >0 then begin i:=pos('<oth>',s)+5; j:=pos('</oth>',s); l:=j-i; c:=copy(s,i,l); writeln('othestvo: ',c); end; end; {/osnovnaya chast dokumenta} end; {zakrivaem fail} close(f); readln; end.
Создаем, читаем и разбираем xml-файл на Lazarus
var Form1: TForm1; f:textfile; implementation ($R *.lfm) (TForm1) procedure TForm1.button1Click(Sender.TObject); var i:integer; s:string; begin savedialog1.Execute; assignfile(f, savedialog1.FileName); rewrite(f); writeln(f,'<?xml version="1.0" standalone="yes"?>'); writeln(f,'<body>'); for i:=0 to stringgrid1.RowCount-1 do begin s:=stringgrid1.Cells[0,i]; if s<> '' then writeln(f,'<fam>',s,'</fam>'); s:=stringgrid1.Cells[1,i]; if s<> '' then writeln(f,'<imya>',s,'</imya>'); s:=stringgrid1.Cells[2,i]; if s<> '' then writeln(f,'<oth>',s,'</oth>'); end; writeln(f,'</body>'); closefile(f); ShowMessage(savedialog1.FileName+' создан'); end; procedure TForm1.button2click(Sender:TObject); var i,n,j,l:integer; s,c:string; begin Opendialog1.Execute; assignfile(f, opendialog1.FileName); reset(f); n:=0; stringgrid1.Clean; While not(eof(f)) do begin readln(f,s); if s<>'<?xml version="1.0" standalone="yes"?>' then begin if pos('<fam>',s)>0 then begin i:=pos('<fam>',s)+5; j:=pos('</fam>',s); l:=j-i; c:=copy(s,i,l); stringgrid1.Cells(0,n):=c; end; if pos('<imya>',s)>0 then begin i:=pos('<imya>',s)+5; j:=pos('</imya>',s); l:=j-i; c:=copy(s,i,l); stringgrid1.Cells(1,n):=c; end; if pos('<oth>',s)>0 then begin i:=pos('<oth>',s)+5; j:=pos('</oth>',s); l:=j-i; c:=copy(s,i,l); stringgrid1.Cells(2,n):=c; n:=n+1; end; end; end; closefile(f); showMessage(savedialog1.FileName+' прочитан'); end; end.
Сервис Google Документы
1. Создайте в сервисе Google Документы текстовый документ
с коллективным редактированием. Распределите задания по набору
фрагментов документа между однокурсниками.
Коллективно созданные документы опубликуйте на отдельных страницах
Ваших сайтов.