Bài tập Pascal 11 (2)

BÀI TẬP VỀ NHÀNHÓM 1Người soạn: Bùi Nuyễn Hoàng AnhBài tập 5 SGK trang 79Viết chương trình nhập từ bàn phím số nguyên dương N (N ≤ 100) và dãy A gồm N số nguyên A1, A2,, AN có giá trị tuyệt đối không lớn hơn 1000. Hãy cho biết dãy A có phải là một cấp số cộng hay không và thông báo kết quả ra màn hình.Input: Nhập từ bàn phím số nguyên dương N (N≤100) và dãy A1, A2,, AN có giá trị tuyệt đối không lớn hơn 1000.Output: dãy A1, A2,, AN là cấp số cộng hoặc không phải là cấp số cộng. Cách 1:Gọi d là công sai của Cấp số cộng (un)Áp dụng: un – un–1 =d  Cách 2:Áp dụng: un = u1 + (n – 1).dThuật toán:Bước 1: Nhập số nguyên dương N (N≤100) và dãy A1, A2,, AN có giá trị tuyệt đối không lớn hơn 1000;Bước 2: d A2 – A1, i  2, csc  true;Bước 4: Nếu i > N thì đi tới Bước 7;Bước 5: Nếu Ai+1 – Ai = d thì i  i+1 rồi quay lại Bước 4;Bước 7: 7.1. Nếu csc = true thì thông báo dãy là một cấp số cộng rồi kết thúc; 7.2. Nếu csc = false thì thông báo dãy không phải là một cấp số cộng rồi kết thúc.Bước 6: Nếu Ai+1 – Ai ≠ d thì csc  false rồi đi tới Bước 7;Bước 3: Nếu i = N =2 thì csc  false rồi đi tới Bước 7;Minh họa đơn giản cho chương trìnhDãy số A gồm 5 số hạng ứng vớiA1 A2 A3 A4 A51 3 5 7 9Gọi d là công sai: d= A1 – A2Dãy A là một CẤP SỐ CỘNGDãy số A gồm 5 số hạng ứng vớiA1 A2 A3 A4 A5Gọi d là công sai: d= A1 – A2 1 3 4 5 7Dãy A không phải là CẤP SỐ CỘNGNhập số lượng phần tử của dãyNhập giá trị phần tử của dãyNếu a[i]–a[i-1]dthì đưa ra thông báo rồi kết thúcBài báo cáo đến đây là hếtCảm ơn cô và các bạn đã theo dõi!