tuyển tập đề thi pascal 1112 HSG tại tỉnh Quảng Trị

S GIO DC & O TO QUNG TR K THI CHN HC SINH GII VN HểA LP 11 THPT CHNH THC Khoỏ ngy: 11 thỏng 04 nm 2013 Mụn thi: TIN HC Thi gian: 180 phỳt ( khụng k thi gian giao ) Em hóy dựng ngụn ng lp trỡnh Pascal hoc FreePascal lp trỡnh gii cỏc bi toỏn sau: Bi (6 im) Dóy nguyờn t Tờn chng trỡnh: PRIMESEQ.PAS Cho trc mt dóy N s nguyờn dng a1,a2,,aN Hóy xỏc nh tng chi phớ T nh nht chuyn dóy s ó cho thnh mt dóy s may mn b1,b2,,bN tha iu kin sau: - bi (1 i N) - bi l s nguyờn t (1 i N) Cho bit: Chi phớ thay th mt s nguyờn a thnh mt s nguyờn b l |a-b| D liu vo: Cho bn PRIMESEQ.INP cú cu trỳc nh sau: - Dũng 1: ghi N - Cỏc dũng tip theo ghi a1,a2,,aN (Cỏc s ghi cỏch ớt nht du cỏch) Kt qu: ghi bn PRIMESEQ.OUT gm mt dũng cha giỏ tr T tỡm c Gii hn d liu:1 106 (Vi i N); 1