Тип данных boolean является

Сколько полей содержится в записи employee?

type data = record day: 1..31;                         month: 1..12;                         year: 1900.. 2100;                  end;           employee = record name: string[20];                             date_entering: data;                           case trade_union: boolean of                                       true: (date_enter: data;                                              leader: boolean);                                      false: (manager: boolean);                      end;

Тип данных real является

Тип данных integer является

Сколько полей содержится в записи man?

type data = record day: 1..31;                         month: 1..12;                         year: 1900.. 2100;                  end;           man = record name: string[20];                        date_birth: data;                        case citizen: boolean of                                true: (birth_place: string[20]);                               false: (country: string[20];                                       date_came: data);                 end;

Какие переменные будут существовать во время выполнения подпрограммы f?

program prog;var a: byte;procedure p1; var a: byte; begin  ... end;procedure p2; function f: boolean;  var a: byte;  begin   ...  end; var a: byte; begin  ... end;

Какие переменные будут существовать во время выполнения подпрограммы p1?

program prog;var a: byte;procedure p1; function f: boolean;  var a: byte;  begin   ...  end; var a: byte; begin  ... end;procedure p2;var a: byte; begin  ... end;

Какие переменные будут существовать во время выполнения подпрограммы p2?

program prog;var a: byte;procedure p1; var a: byte; begin  ... end;procedure p2; function f: boolean;  var a: byte;  begin   ...  end; var a: byte; begin  ... end;

Типы данных byte и shortint являются:

Типы данных real и integer являются:

Типы данных double и real являются: