6. необходимо установить пароль на документ. опишите действия после
команды
«защитить докуменt».
открыть
закрыть
сведения
требуется активация продукта
microsoft office профессиональный плюс 2010 требует действительной
лицензии для продукта. чтобы получить действительнук лицензино для
продукта, активируйте ключ продукта сейчас.
последние
активировать
продукт
создать
печать
разрешения
все могут открывать, копировать и изменята любую часть этого
документа.
сохранить и отправить
защитить
документ
справка
Ключевые слова:
• электронные таблицы
• табличный процессор
• столбец
• строка
• ячейка
• диапазон ячеек
• лист
• книга
Сотни лет в деловой сфере при выполнении громоздких однотипных расчётов используются таблицы. С их рассчитывается заработная плата, ведутся различные системы учёта материальных ценностей, просчитывается стоимость новых товаров и услуг, прогнозируется размер прибыли и т. д. Такие расчёты многие специалисты до конца века выполняли с калькуляторов, вручную занося полученные результаты в соответствующие графы таблиц. Эта работа требовала больших временных затрат; на исправление незначительной ошибки, допущенной расчётчиком, уходили недели и даже месяцы.
const n=100;
var ar:array of array of integer;
ars:array of array of string;
i:integer;
procedure complection(var ar:array of array of integer;var ars:array of array of string);
var
i,j:integer;
begin;
for i:=1 to n do
begin;
for j:=1 to n do
begin;
ar[i,j]:=random(9);
str(ar[i,j],ars[i,j]);
end;
end;
end;
procedure burning(ars:array of array of string);
var
i,j:integer;
t:text;
begin;
assign(t,'text.txt');
rewrite(t);
for i:=1 to n do
begin;
writeln(t,' ');
for j:=1 to n do
write(t,ars[i,j],' ');
end;
end;
begin;
randomize;
setlength(ar,n+1);
setlength(ars,n+1);
for i:=1 to n do
begin;
setlength(ar[i],n+1);
setlength(ars[i],n+1);
end;
complection(ar,ars);
burning(ars);
end.