расшифруйте две строки программы

[Cooler]

var p1 : Psingle;
bb : array[0..3] of byte;
begin
bb[3]:= StrToInt(Edit2.Text);
bb[2]:= StrToInt(Edit3.Text);
bb[1]:= StrToInt(Edit4.Text);
bb[0]:= StrToInt(Edit5.Text);
p1 := @bb[0]; ДВЕ ПРОБЛЕМНЫЕ СТРОКИ
Edit1.Text := Format('%f',[p1^]); ЧТО ОНИ ЗНАЧАТ?

[SuperVisor]

Символ @ в дельфи означает указатель на область памяти, т.е p1 присваивается область памяти массива bb[0], результатом является строка Edit5 в численном представлении.
Во второй строке мы видим преобразование некоторого количества аргументов... Тут стоит углубиться:
Format (const Format : String; const Args : array of const): String
Функция преобразует произвольное количество аргументов Args в сторку в соответствии со спецификаторами параметров Format(смотри справку Format strings) в хэлпе Delphi.
Edit1.Text := Format('%f',[p1^]) означает, что Текст поля Edit1 становится равным, согласно результату функции, вещественным числом в виде -ddd,ddd из указателя на строку p1.