Завдання 3. Створити проект, у якому є 1 кнопка, 1 багаторядкове поле введення інформації та І напис. Ім'я користувача вводиться у текстове поле. При клацанні кнопки даний текст заноситься у напис на формі.

Program project1;
uses
crt,math;
var  s:real;  i,j,f:real;  a:integer;
begin 
writeln('vvedite 1 chislo ');readln(i);
  writeln('vvedite 2 chislo ');readln(j); 
 writeln('vvedite 3 chislo ');readln(f); 
 s:=i; 
 if j<s then s:=j; 
 if f<s then s:=f;
 if s<0 then 
 begin  
  if i<0 then inc(a);  
  if j<0 then inc(a);  
  if f<0 then inc(a);  
  writeln('kolichestvo otricatelnix ',a:2);
  end 
 else  
begin  
  if i>0 then i:=i*-1;
  if j>0 then j:=i*-1;
  if f>0 then f:=i*-1; 
 end; 
 writeln('min chislo ',s:2:0); 
 readln;
end.     

Относительная адресация задается просто буквой (столбец) и цифрой (строка).
Например, в ячейках A1, A2, A3, ..., A10 пишем числа, а в ячейке B1 пишем
=A1*2.
Теперь, если скопировать ячейку B1 в B2, то адрес изменится и получится
=A2*2.
Так можно составить таблицу умножения на 2.
Но, если скопировать B1 в C1, то получится
=B1*2
То есть в столбце С уже получится таблица умножения на 2 для столбца В.

Абсолютная адресация задается знаком $ перед нужной координатой.
Например, если написать в ячейке  B1
=$A1*2,
то столбец А будет задан абсолютно, а строка - относительно.
Теперь, если скопировать из B1 в B2, то получится
=$A2*2
А вот если скопировать в С1, то получится
=$A1*2,
то есть в столбце С получится копия столбца В.
А если поставить и строку в абсолютную ссылку
=$A$1*2,
то при копировании в любую ячейку формула не изменится.
Обычно абсолютную адресацию используют, когда хотят всю таблицу умножить на какой-то коэффициент, например, перевести долларовые цены в рубли.
Тогда в какой-то ячейке за пределами таблицы, например, в K1 пишут курс,
а во всей таблице пишут
=A1*$K$1
Теперь при копировании этой формулы на всю таблицу будет меняться только 
адрес текущей ячейки А1, а адрес ячейки с курсом K1 остается неизменным.