const
n = 9; //константа может быть любой
type
mas = array[0..n] of integer; //тип задал только для процедуры, без подпрограмм отдельный тип не нужен
procedure copy_mas(var a, b: mas);
var
i, i1: integer;
begin
i1 : = 0;
for i : = 0 to n do
if (a[i] > = 0) and (a[i] < = 10) then
begin
b[i1] : = a[i];
i1 += 1;
end;
end;
TF (англійською Rich Text Format — «формат збагаченого тексту») — текст з форматуванням і вставленими об'єктами;
DOC — текст з форматуванням і вставленими об'єктами, основний формат Microsoft Word 97/2000/XP/2003;
DOCX — текст з форматуванням і вставленими об'єктами, основний формат Microsoft Word 2007/2010;
ODT — текст з форматуванням і вставленими об'єктами, основний формат LibreOfficeWriter;
PDF — формат для перегляду та друкування з незмінним вихідним форматуванням для різних платформ;
TXT — текст з розбиттям на абзаци без форматування;
HTML — (англійською HyperText Markup Language — мова розмітки гіпертекстових документів) — стандартна мова розмітки веб-сторінок в Інтернеті і відповідне розширення файлу;
XML (англійською Extensible Markup Language — розширювана мова розмітки) — запропонований консорціумом World Wide Web (W3C) стандарт побудови мов розмітки ієрархічно структурованих даних для обміну між різними застосунками, зокрема, через Інтернет і відповідне розширення файлу.