TURBO PASCAL:Учебное пособие. Терёхин В.В. - 87 стр.

m: = m + a. r;
t:= а . r / a . v;

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

        with <переменная-запись> do <оператор>;

Внутри оператора, входящего в оператор присоединения, ком-
поненты записи обозначаются с помощью только имён полей
(имя переменной-записи перед ними не указывается). Заголо-
вок операторов может содержать список переменных-записей:

      with <переменная-запись>{,<переменная-запись>} do
<оператор>;

Пример (используем запись из приведённого выше примера):
        1)
with a do
begin
   f:=’Иванов’ ; n:=6; d:=23; r:=1.78; v:=63.5;
end;
        2)
program p41;
{программа осуществляет ввод информации об уча-
щихся класса, выводит на экран введенную информа-
цию и отношение роста ученика к его массе}
const
   n:= 30;            {количество учеников в классе}
type
   child = record {тип запись-информация об ученике}
      f, i: String;
      m, d, n: integer;
      r, v: Real ;
   end;
                                                          87