油库自流装卸系统上机编程实验报告.doc

袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄蒂莇羂羃膂薂羈羂莄莅袄羁蒆蚀螀羀膆蒃蚆罿芈虿羄羈莁蒁袀肈蒃蚇螆肇膃蒀蚂肆芅蚅蚈肅蒇薈羇肄膇螃袃肃艿薆蝿肂莁螂蚅肂蒄薅羃膁膃莇衿膀芆薃螅腿蒈莆螁膈膈蚁蚇膇芀蒄羆膆莂虿袂膆蒅蒂螈膅膄蚈蚄芄芇蒁羂芃荿蚆袈节薁葿袄芁芁螄螀袈莃薇蚆袇蒅螃羅袆膅薅袁袅芇螁螇羄莀薄蚃羄 1题目：某油库的自流装卸系统，如图所示，装油管设置在集油管中部，且两侧鹤管同时装油，两侧鹤管对称布置。油库油料为车用汽油，操作条件下车用汽油的粘度为 0.610-6m2/s，鹤管采用1084的钢管，鹤管计算长度为25m，鹤管间距为12.5m，集油管为2196，输油管为1595，输油管计算长度为1500m，油库库容为30000m3，单个罐的容量为3000m3，油罐内径为1.6m，罐壁高度为15.85，罐出油口与装油鹤管出口之间的高差为30m。（1）计算鹤分别管数为20和30，液位高度为3m和10m时所对应的各鹤管流量？（2）操作鹤管数为30，发油量为1500m3，开始发油时液位高度为12m，计算发油时间？。21程序框图：开 机输入参数 n 计算常数 =+v(1) (1) hf1(1) u(1) hf2(1)i=2 to n/2(i)= (i-1)+ hf1(i) (i)+ yesu(i-1) (i) hf2(i) in/2=2(+)； = +hf1(1)+hf2(1)+hf2(n/2)+ +z yes输出q1(1)q1（n/2）； 输入发油量v0 算z1=z0-v0/f；调用过程再算q1t=2v0/（q1+q0）结 束还需要另外调用过程算摩阻3程序代码:31该程序的执行顺序如下:311:显示封面窗体,启动312:单击“计算”命令按钮,封面窗体消失,显示基本参数设置界面;此时如果单击“退出”命令,则程序结束.313:修改各个参数后,单击“计算发油时间”命令按钮,进入计算时间窗体;单击“计算各鹤管流量”命令按钮则进入鹤管界面.单击“返回”按钮,回到启动窗体.314:进入计算时间窗体后,再输入各个变量.单击确定后显示发油时间.单击“返回”按钮,回到上一级窗体.315:进入鹤管窗体后, 再输入各个变量.单击“输出图形”命令按钮后显示平均流量与液面高度图.单击“返回”按钮,回到该窗体.316:在鹤管窗体里,单击“显示各鹤管流量”命令按钮,则显示鹤管数一半的各管流量.单击“返回”按钮,回到该窗体.32封面窗体程序：private sub command1_click()form2.showform1.hideend subprivate sub command2_click()endend sub33基本参数窗体程序：private sub command1_click()form3.showform2.hideend subprivate sub command2_click()form4.showform2.hideend subprivate sub command3_click()form1.showform2.hideend sub34时间窗体程序：private sub command1_click() cls autoredraw = truedim hf as single, v() as single, u() as single, hf1() as singledim hf2() as single, hf0 as single, q1() as single, q2() as single d1 = val(form2.text1.text): d2 = val(form2.text2.text): d0 = val(form2.text3.text) l1 = val(form2.text4.text): l2 = val(form2.text5.text): l0 = val(form2.text6.text) pi = 3.14: t1 = 0.00001: t2 = 0.00001: e = 0.0002: g = 9.8 p = val(form2.text7.text): h0 = val(form2.text8.text) n = val(form3.text1.text): z0 = val(form3.text2.text): v0 = val(form3.text3.text) a1 = (pi * d1 2) / 4: a2 = (pi * d2 2) / 4: a0 = (pi * d0 2) / 4 b1 = l1 / (2 * g * d1): b2 = l2 / (2 * g * d2): b0 = l0 / (2 * g * d0) z1 = z0 - (v0 / 201) m = n / 2 call module1.liul(z0) q00 = q0 if v0 0 then call module1.liul(z1) q01 = q0 t = (2 * v0) / (3600 * (q01 + q00) else t = 0end if text4.text = tend subprivate sub command2_click()form2.showform3.hideend sub35鹤管窗体程序：dim hf as single, v() as single, u() as single, hf1() as singledim hf2() as single, hf0 as single, q2() as single private sub command1_click()form5.showform4.hideform5.cls d1 = val(form2.text1.text): d2 = val(form2.text2.text): d0 = val(form2.text3.text) l1 = val(form2.text4.text): l2 = val(form2.text5.text): l0 = val(form2.text6.text) pi = 3.14: t1 = 0.00001: t2 = 0.00001: e = 0.0002: g = 9.8 p = val(form2.text7.text): h0 = val(form2.text8.text) n = val(form4.text1.text): z0 = val(form4.text2.text): v0 = 0 a1 = (pi * d1 2) / 4: a2 = (pi * d2 2) / 4: a0 = (pi * d0 2) / 4 b1 = l1 / (2 * g * d1): b2 = l2 / (2 * g * d2): b0 = l0 / (2 * g * d0) z1 = z0 - (v0 / 201) m = n / 2 autoredraw = true form5.scale (-0.1, 30)-(0.1, -30) form5.line (0, 30)-(0, -30) form5.line (0.1, 0)-(-0.1, 0) form5.line (0, 0)-(0, -30) call module1.liul(z0)end subprivate sub command2_click()form6.showform4.hide form6.cls d1 = val(form2.text1.text): d2 = val(form2.text2.text): d0 = val(form2.text3.text) l1 = val(form2.text4.text): l2 = val(form2.text5.text): l0 = val(form2.text6.text) pi = 3.14: t1 = 0.00001: t2 = 0.00001: e = 0.0002: g = 9.8 p = val(form2.text7.text): h0 = val(form2.text8.text) n = val(form4.text1.text): z0 = val(form4.text2.text): v0 = 0 a1 = (pi * d1 2) / 4: a2 = (pi * d2 2) / 4: a0 = (pi * d0 2) / 4 b1 = l1 / (2 * g * d1): b2 = l2 / (2 * g * d2): b0 = l0 / (2 * g * d0) z1 = z0 - (v0 / 201) m = n / 2 call module1.liul(z0) for i = 1 to m form6.print i, q1(i) next iend subprivate sub command3_click()form2.showform4.hideend sub36图形窗体程序：private sub command1_click()form4.showform5.hideend sub37流量窗体程序：private sub command1_click()form4.showform6.hideend sub38调用模块程序：public d1 as single, d2 as single, d0 as single, l1 as single, l2 as single, l0 as singlepublic a1 as single, a2 as single, a0 as single, b1 as single, b2 as single, b0 as singlepublic t1 as single, t2 as single, p as single, e as single, g as single, t as singlepublic z1 as single, v0 as single, h0 as single, u0 as single, pi as single, f as singlepublic n as single, e1 as single, m as single, z0 as single, q0 as single, b3 as singlepublic q01 as single, q00 as single, q1() as singled1,d2,d0,是鹤管;集油管；输油管的直径。l1,l2,l0是鹤管;集油管；输油管的计算长度q1()是各鹤管流量，q2（）是各段集油管流量，q0是过程中输油管的流量q00，q01是输油管流量，hf是集油管线总摩阻，hf1()是各鹤管的摩阻，hf2()是各段集油管的摩阻。hf0是输油管摩阻，t1,t2是计算中的两个增量，p为粘度，e绝对粗糙度，e1是相对粗糙度v0是发油量，pi是3.14, t是发油时间public sub mozu(u as single, d as single, b as single)dim re as single, re1 as single, re2 as single re = (d * u) / p e1 = (2 * e) / d re1 = 59.7 / e1 1.14 re2 = 665 - 765 * (log(e1) / log(10) / e1if re 2000 and re 3000 re1 and re re2 then f1 = 1 / (1.74 - 2 * log(e1) / log(10) 2 f = f1 * (u 2) * bend ifend subpublic sub liul(z as single)redim v(1 to m) as single, u(1 to m) as single, hf1(1 to m) as singleredim hf2(1 to m) as single, q1(1 to m) as single, q2(1 to m) as single q1(1) = 0 do q0 = 0: hf = 0 q1(1) = q1(1) + t1 v(1) = q1(1) / a1 u(1) = q1(1) / a2 call module1.mozu(v(1), d1, b1) hf1(1) = f call module1.mozu(u(1), d2, b2) hf2(1) = f for i = 2 to m c = 0 do c = c + t2 q1(i) = q1(i - 1) + c v(i) = q1(i) / a1 call module1.mozu(v(i), d1, b1) hf1(i) = f x = v(i) 2 / (2 * g) + hf1(i) y = v(i - 1) 2 / (2 * g) + hf1(i - 1) + hf2(i - 1) if x y then exit do loop k = 0 for j = 1 to i k = q1(j) + k next j q2(i) = k u(i) = q2(i) / a2 b3 = l2 / (2 * g * d2) * (1 / 2) if i = m then call module1.mozu(u(i), d2, b3) hf2(i) = f else call module1.mozu(u(i), d2, b2) hf2(i) = f end if next i for i = 1 to m q0 = q0 + q1(i) * 2 hf = hf + hf2(i) next i u0 = q0 / a0 call module1.mozu(u0, d0, b0) hf0 = f w = v(1) 2 / (2 * g) + hf1(1) + hf + hf0 - h0 if v0 = 0 then form5.line -(q0, w), vbred if w z then exit do loopend sub4 运行界面：5 使用说明及设计问题：51说明 d1,d2,d0,是鹤管;集油管；输油管的直径。l1,l2,l0是鹤管;集油管；输油管的计算长度；q1()是各鹤管流量，q2（）是各段集油管流量，q0是过程中输油管的流量；q00，q01是输油管流量，hf是集油管线总摩阻，hf1()是各鹤管的摩阻，hf2()是各段集油管的摩阻。hf0是输油管摩阻，t1,t2是计算中的两个增量，p为粘度，e绝对粗糙度，e1是相对粗糙度，v0是发油量，pi是3.14, t是发油时间511根据实际的鹤管数和液位高度等不同的情况，改变参数。即可算出各鹤管的流量和发油时间。52问题需假设第一支鹤管的流量，然后迭加，当满足伯诺利方程时退出循环。521第二支鹤管流量的算法也是采用迭加法，在第一支鹤管流量的基础上迭加，当满足伯诺利方程时退出循环。522最后一段集油管只有一半的长度进入计算。523没有告诉集油管与罐底的高差，所以不能从集油管段与罐底列伯诺利方程，只能从罐底到鹤管口列伯诺利方程。524每次算摩阻损失，都需要根据流速调用一次mozu过程525不同的液位高差，都需要根据高差调用一次liul过程6计算结果：6 1计算鹤管别管数为20和30，液位高度为3m和10m时所对应的各鹤管流量输出图形：6 2 操作鹤管数为30，发油量为1500m3，开始发油时液位高度为12m，计算发油时间 莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁薈螀蚁羀莁蚆螁肃薆薂螀膅荿蒈蝿莇膂袇螈肇蒇螃螇腿芀虿螆节蒆薅螅羁芈蒁螅肄蒄蝿袄膆芇蚅袃芈蒂薁袂羈芅薇袁膀薁蒃袀节莃螂衿羂蕿蚈衿肄莂薄袈膇薇蒀羇艿莀蝿羆罿膃蚅羅肁莈蚁羄芃膁薇羄羃蒇蒃羃肅艿螁羂膈蒅蚇羁芀芈薃肀羀蒃葿聿肂芆螈肈芄蒁螄肈莆莄蚀肇肆薀薆蚃膈莂蒂蚂芁