Объяснение:
program ArraySum;
var
Numbers : array[1..18] of real;
Result : real;
i : integer;
begin
Result := 0;
for i:= 1 to 18 do begin
Write('Input ', i ,'th element of array');
ReadLn (Numbers[i]);
end;
for i:= 1 to 18 do begin
if Numbers[i] < 10 then Result := Result + Numbers[i];
end;
Writeln('Result = ', Result:5:2);
end.
1)часть гипертекстового документа ссылающаяся на другой элемент (команда, текст, заголовок, примечанию изображения) в самом документе на другой объект( файл, каталог,приложение) расположенный на локальном диске или в компьютерной сети, либо на элементы этого объекта.
2)Согласно источнику с днём я помню чтобы делать сноски в Word Также можно воспользоваться комбинацией клавиш для вставки обычной сноски в Word комбинация клавиш-Ctrl+Alt+F.
3)для вставки концевой сноски в ворде-Ctrl+Alt+D
5)Выделите текст или Объект, который должен представлять гиперссылку; щелкните его правой кнопкой мыши и выберите пункт ссылка; в разделе Связаться выберите параметр место в документе; в списке выберите заголовок при закладку на которую должны указывать гиперссылка.
6)понятие авторского права под авторским правом понимается совокупность имущества и личных неимущественных прав принадлежащие автору творческим трудом которого создано произведение науки литературы или искусства. исключеные не исключеные авторские права
7) в ворд оглавление состовляет по спискуформатирование заголовка в тексте. то есть, чтобы сделать оглавление в Word, необходимо чтобы у вас в тексте были заголовки отформатированные при авто стиля заголовок 1 заголовок, 2 и других, в зависимости от уровня заголовка
8)1этап: установить в тексте курсор на 1 заголовок; 2этап команды ссылке добавить текст присвоить уровень будущего оглавления (1,2,3) 3 этап: применить данную операцию ко всем заголовкам текстом; 4 этап: установить курсор вместо вставки оглавления в начале документов; 5 этап: команда ссылки оглавления выбрать виды оглавление.
const N=18;
var
mas: array[1..N] of integer;
i,sum: integer;
begin
sum:=0;
write('Введите элементы массива: ');
for i:=1 to N do
begin
write(i, ' элемент: ');
readln(mas[i]);
if mas[i] < 10 then
sum:=sum+mas[i];
end;
writeln('Сумма элементов массива меньших 10: ', sum);
end.