Задача №1 var a:array[1..4, 1..5] of integer; i,j,k:integer; begin writeln('Заполните матрицу'); for i:=1 to 4 do for j:=1 to 5 do begin read(a[i,j]); if (a[i,j] mod 3=0) and (a[i,j]>20) then k:=k+a[i,j]; end; writeln('Сумма элементов кратных 3-м и > 20 = ',k); end.
Задача №2 var a:array[1..5, 1..5] of integer; i,j,k:integer; begin writeln('Заполните матрицу'); for i:=1 to 5 do for j:=1 to 5 do begin read(a[i,j]); if i=j then k:=k+a[i,j]; end; writeln('Сумма элементов главной диагонали = ',k); end.
6. Наведите указатель мыши на папку в списке Recent Folders (Последние папки). Кликните по иконке в форме лежащей на боку канцелярской кнопки. Примечание: Если в списке Recent Folders (Последние папки) нет той папки, которую Вы хотите закрепить, нужно открыть любой документ, находящийся в этой папке.
7. В этом окне можно указать какой текст или символ нужно заменить на другой текст или символ. Используя параметры поиска можно сделать более сложную замену (указать направление поиска, с учетом регистра, с использованием частичного совпадения с подстановочными символами, произносится как (английский), все словоформы, учитывая префикс, суффикс, не учитывать знаки препинания, не учитывать пробелы) а так же можно заменять форматирование текста или вовсе его снять.
8. можно
9. Нужно использовать коллекции экспресс блоков которые могут содержать фрагменты текста и рисунки. Их содержимое можно многократно вставлять в нужное место в тексте.
10. Под экспресс блоками в word понимаются стандартные блоки автотекста, свойства документа и поля. Экспресс блоки создаются в меню создания экспресс блоков. А стандартный блок создается из уже готового документа путем выделения текста и сохранения его в коллекцию экспресс блоков. Этот блок будет доступен из любого документа открытого на этом рабочем месте.
11. Создать свою коллекцию блоков можно выделяя готовый текст в документе и добавляя его в свою коллекцию блоков и после этого воспользоваться организатором стандартных блоков чтобы присвоить имена для этих блоков.
var a:array[1..4, 1..5] of integer;
i,j,k:integer;
begin
writeln('Заполните матрицу');
for i:=1 to 4 do
for j:=1 to 5 do begin
read(a[i,j]);
if (a[i,j] mod 3=0) and (a[i,j]>20) then k:=k+a[i,j];
end;
writeln('Сумма элементов кратных 3-м и > 20 = ',k);
end.
Задача №2
var a:array[1..5, 1..5] of integer;
i,j,k:integer;
begin
writeln('Заполните матрицу');
for i:=1 to 5 do
for j:=1 to 5 do begin
read(a[i,j]);
if i=j then k:=k+a[i,j];
end;
writeln('Сумма элементов главной диагонали = ',k);
end.
7. В этом окне можно указать какой текст или символ нужно заменить на другой текст или символ. Используя параметры поиска можно сделать более сложную замену (указать направление поиска, с учетом регистра, с использованием частичного совпадения с подстановочными символами, произносится как (английский), все словоформы, учитывая префикс, суффикс, не учитывать знаки препинания, не учитывать пробелы) а так же можно заменять форматирование текста или вовсе его снять.
8. можно
9. Нужно использовать коллекции экспресс блоков которые могут содержать фрагменты текста и рисунки. Их содержимое можно многократно вставлять в нужное место в тексте.
10. Под экспресс блоками в word понимаются стандартные блоки автотекста, свойства документа и поля. Экспресс блоки создаются в меню создания экспресс блоков.
А стандартный блок создается из уже готового документа путем выделения текста и сохранения его в коллекцию экспресс блоков. Этот блок будет доступен из любого документа открытого на этом рабочем месте.
11. Создать свою коллекцию блоков можно выделяя готовый текст в документе и добавляя его в свою коллекцию блоков и после этого воспользоваться организатором стандартных блоков чтобы присвоить имена для этих блоков.