Дп
Дпомпвл
Перевод фрагмента программы с Pascal на С
const n_max=$fcOO; {Максимальная память для дерева}
type Vector=array[1..n_max] of Char;
var f :Text; {Текстовый файл}
z :Vector; {Двоичное дерево движения
по треугольнику}
const n_max=$fcOO; {Максимальная память для дерева}
type Vector=array[1..n_max] of Char;
var f :Text; {Текстовый файл}
z :Vector; {Двоичное дерево движения
по треугольнику}
const int n_max=0xfc00;
typedef int Vector[n_max];
FILE *f;
Vector z;