Подскажите пожалуйста какую функцию необходимо использовать...

[Андрю)(@]

Подскажите пожалуйста какую функцию необходимо использовать для подсчёта сколько места занимает данный отрывок в памяти:

Type H=Record
       fio:string[10];
       kol:byte;
       ves:integer;
       sr:real;
       end;

[Serge_Bliznykov]

да так же, как и для любого другого типа данных - SizeOf():

WriteLn('размер = ',sizeOf(H):1);