tailieunhanh - Một số chương trình Pascal đơn giản dùng cho thiết kế đường ôtô part 6

Tham khảo tài liệu 'một số chương trình pascal đơn giản dùng cho thiết kế đường ôtô part 6', kỹ thuật - công nghệ, cơ khí - chế tạo máy phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | Tốn thất tại cửa xả tn 1 V 0 75 m s. Tương ứng với kênh khi Q 15 m3 s . 0 752 h 3 0 03 13 2x9 8 Do mớ rộng khu dân cư mức nước tăng lên hl4 0 55m nên có mức nước thực tế MNTT m Vậy tổn thất cột nước toàn bộ là ht ht hl2 hl3 h 4 0 74m Vậy cao độ nước dềnh từ cao độ thiết kế là hd 5 02 0 74 5 76 m Tính hA đơn giản coi mức nước dềnh bằng tổn thất cột nước Cao độ này ngập đến đỉnh cống 4 75O ở G2 và cống Ộ500 ở Gị chỉ còn hở chiều cao là h 6 28 - 0 08 - 5 76 0 44 m Trị số 0 08 là bề dày thành cống Như vậy nguyên lý thoát nước cho F F2 lúc này là chảy theo xi phông trong đoạn GI - Cx. Cao độ mặt đường Đm Cao độ linh cống Đ Cao độ đấy cõng Đc Cao độ đáy giếng Đg Hình 4-11 Mặt cắt dọc cống theo ví dụ 4-5. 120 3 Lập chương trình TN 4-5 tính tổn thất cục bộ Program Tính_tổn_thât_cục_bộ ues crt var h hl h2 h3 h4 tn tx real i vf integer v array 1. 10 of integer begin clrscr write nhập vào mức nưóc dềnh cao hơn thiết kế h4 m readln h4 write nhập vào hệ số tổn thất ở giêng thãm tn readln tn write nhập vào hệ số tổn thất ở cửa xả tx readln tx write nhập vào sô vf readln vf for i 1 to vf do begin write v i readin v i if v i v l then hl tn sqr v l 100 2 if v i v 2 then h2 tn sqr v 2 100 2 if v i v 3 then h3 tx sqr v 3 100 2 9 8 end begin . h hl h2 h3 h4 writeln Tổn thất cột nước toàn bộ là h h 6 2 m end readln end. Chạy theo số liệu thí dụ 4-5 in ra kết qua như sau nhap vao muc nuoc denh cao hon thiet ke h4 m nhap vao he so ton thai o giêng tham tn nhap vao he so ton that o cua xa tx Ị .0 121 nhap vao so vf 3 vỊỈỊ 175 v 2 Ỉ76 v 3 75 Ton that cot nuoc Ioan bo la h m Đặc điểm chương trình TN 4-5 là - Dùng cấu trúc mảng array và để đưa vào tốc độ nước ở các đoạn khác nhau - Tốc độ V được nhân với 100 để thành số nguyên dùng được lệnh ỡr i ỉ to vfdo - Lưu ý sau khi nhập vf 3 ta phải nhập tiếp v l 175 v 2 176 v 3 75 máy mới chạy ra kết quả h m. 4-6. MỘT VÀI VẤN ĐÊ VỀ PHAN mềm thoát NƯỠC Tính toán thuỷ lực thoát nưởc đô thị là