Обязательно блок-схемой! дано целое число n> 0. найти сумму 1 + 1/2 + 1/3 + … + 1/n. составить алгоритм, используя цикл со счётчиком.

Форматирование символов - изменение значений свойств символов. К основным свойствам символов можно отнести: шрифт, размер шрифта, начертание и цвет.

Форматирование символов предусматривает:

1. Изменение типа шрифта, Times New Roman, Courier New и т.д.

2. Размер шрифта.

3. Начертание шрифта: полужирный, курсив, подчеркивание.

Форматирование абзацев предусматривает:

1. Установку ширины абзаца.

2. Установку абзацного отступа.

3. Установку выравнивания строк: по правому краю, по левому краю, по центру, по ширине.

4. Установку межстрочного интервала

Объяснение:

Const 
  sixteen: string = '0123456789ABCDEF';

function TenIn16(x: integer): string;
var  s: string;
begin 
  repeat   
  s := sixteen[x mod 16 + 1] + s;   
  x := x div 16; 
  until x = 0; 
  if length(s) = 1 then    s := '0' + s; 
  TenIn16 := s;
end;

var 
  f1, f2: text; 
  a1, a2, a3: byte;

begin 
  assign(f1, 'record.txt'); 
  reset(f1); 
  assign(f2, 'result.txt'); 
  rewrite(f2); 
  while not eof(f1) do  
  begin   
    read(f1, a1, a2, a3);   
    writeln(f2, TenIn16(a1), TenIn16(a2), TenIn16(a3)); 
  end; 
  close(f1); 
  close(f2);
end.