Структурная эквивалентность типов: различия между версиями

Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
(Новая: == Ссылки == *Особенности языка: продвинутый уровень *[http://pascalabc.net/ru/bazovyie-osobennosti-yazyika-i-bibliotek.html Сайт PascalAB...)
 
Нет описания правки
Строка 1: Строка 1:
<source lang="Delphi">var
  a: array of integer;
  a1: array of integer;
  s: set of real;
  s1: set of real;
  p: procedure (i: integer);
  p1: procedure (i: integer);
  r: ^integer;
  r1: ^integer;
procedure proc(aa: array of integer; ss: set of real; pp: procedure (i: integer); rr: ^integer);
begin
 
end;
begin
  a := a1;
  s := s1;
  p := p1;
  r := r1; // В Delphi ни одно из этих присваиваний не сработает
  proc(a,s,p,r); // Этот вызов - тоже
end.</source>
== Ссылки ==
== Ссылки ==
*[[Особенности языка: продвинутый уровень]]
*[[Особенности языка: продвинутый уровень]]
*[http://pascalabc.net/ru/bazovyie-osobennosti-yazyika-i-bibliotek.html Сайт PascalABC.NET: Особенности языка]
*[http://pascalabc.net/ru/bazovyie-osobennosti-yazyika-i-bibliotek.html Сайт PascalABC.NET: Особенности языка]

Версия от 10:31, 16 января 2010

var 
  a: array of integer;
  a1: array of integer;
  s: set of real;
  s1: set of real;
  p: procedure (i: integer);
  p1: procedure (i: integer);
  r: ^integer;
  r1: ^integer;

procedure proc(aa: array of integer; ss: set of real; pp: procedure (i: integer); rr: ^integer);
begin
  
end;

begin
  a := a1;
  s := s1;
  p := p1;
  r := r1; // В Delphi ни одно из этих присваиваний не сработает
  proc(a,s,p,r); // Этот вызов - тоже
end.

Ссылки