5 lines
140 B
ObjectPascal
5 lines
140 B
ObjectPascal
|
## uses u_common_arr1_1, u_common_arr1_2;
|
|||
|
|
|
|||
|
|
// Проверяем что типы всё ещё совместимые
|
|||
|
|
v1 := v2;
|
|||
|
|
v2 := v1;
|