Практическая работа "Создание таблицы Word" Цель работы:
научиться выполнять операции по созданию и форматированию таблиц в
документе; операции по обработке данных таблицы: сортировка, вычисление;
научиться создавать табличную модель на основе текстового описания и
реализовывать ее в среде текстового редактора.
Задание 1.
Создайте в новом документе таблицу с заданным форматированием (см. Таблица 1).
Таблица 1
Ключ к заданию:
1. Вставьте таблицу, используя команду Вставка-Таблица, предварительно определив
количество столбцов — 6, строк — 9.
2. Установите ширину столбцов: 1 столбец — 4,5 см, 2-5 столбец — 1,8 см, 6 столбец — 2,4
см.
Для этого используйте команду Свойства таблицы из контекстного меню выделенного
столбца. Другим задания ширины столбцов, является перетаскивание границы
столбца ЛКМ при нажатой клавише ALT. При этом на линейке отображается ширина
столбов таблицы в сантиметрах.
3. Выполните обрамление таблицы, используя команду Границы и заливка из
контекстного меню, предварительно выделив всю таблицу (см. Рисунок 1).
Рисунок 1
Проделав вышеизложенные операции, получили таблицу:
Рисунок 2
4. Объедите попарно ячейки 2-3, 4-5, 1 и 7, 6 и 12. Для этого выделите пару ячеек и
выполните команду Объединить ячейки из контекстного меню.
5. Введите текст таблицы.
6. Отформатируйте текст таблицы по образцу Таблица 1. Для ячеек заголовка таблицы
(строки 1-2) выполните выравнивание по центру и по середине ячейки. Для этого
выполните команду контекстного меню Выравнивание ячеек (Рисунок 3).
Рисунок 3
7. Сравните полученную вами таблицу с образцом Таблица 1.
Задание 2. Выполните сортировку в таблице, упорядочив строки по площади страны в
порядке возрастания.
Ключ к заданию:
Для выполнения сортировки необходимо:
Выделить таблицу, без строк заголовка.
Выполнить команду сортировка, нажав на кнопку на вкладке Главная.
Установить следующие параметры:
Рисунок 4
Обратите внимание на то, что строки в таблице переставлены согласно параметру
сортировки.
Type
ty=array[1..25] of integer;
Var
n,i:integer;
ar:ty;
procedure sortbutmeh(var ar:ty;n:integer);
Var
i,j,c:integer;
begin
for i:=1 to n-1 do
for j:=i+1 to n do
if ar[i]<ar[j] then
begin
c:=ar[i];
ar[i]:=ar[j];
ar[j]:=c;
end;
end;
begin
randomize;
readln(n);
writeln('First array:');
for i:=1 to n do
begin
ar[i]:=random(100);
write(ar[i]:4);
end;
sortbutmeh(ar,n);
writeln;
writeln('Array after sortbutmeh()');
for i:=1 to n do
write(ar[i]:4);
end.
//2)
Var
n:integer;
procedure ned(n:integer);
begin
case n of
1:writeln('Понедельник');
2:writeln('Вторник');
3:writeln('Среда');
4:writeln('Четверг');
5:writeln('Пятница');
6:writeln('Суббота');
7:writeln('Воскресенье');
end;
end;
begin
readln(n);
ned(n);
end.
//3)
Var
s:string;
function lengthbutmeh(s:string):integer;
begin
while pos(' ',s)<>0 do
delete(s,pos(' ',s),1);
lengthbutmeh:=length(s);
end;
begin
readln(s);
writeln(lengthbutmeh(s));
end.
Лишние словосочетание выделено жирным шрифтом :
а. Формирование у пользователей компьютера навыков грамотной постановки задач, возникающих в практической деятельности, для их решения с компьютера.
б. Формирование у пользователей компьютера навыков использования основных типов прикладных программ общего назначения для решения с их практических задач и понимания основных принципов, лежащих в основе этих систем.
в. Формирование у пользователей компьютера навыков печати десятипалым методом.
г. Формирование у пользователей компьютера умения грамотно интерпретировать результаты решения практических задач с компьютеров и применять эти результаты в практической деятельности.