Turbo Pascal với chương trình tính gió động và động đất - Đặng, Tỉnh (Khoa học và Kỹ thuật, 2005)