program makedat;
uses revdat;
begin
InitDatFile;
AddDizPas;
makedatfileall;
end.