近年來關注信息學奧賽編程題目的用戶越來越多，小編整理了關于信息學奧賽 1000-入門測試題目，信息學奧賽的編程軟件是什么，信息學奧賽試題（計算機編程），全面解讀C++信息學奧賽，家長必讀 | 奧林編程，推薦幾個信息學(編程)題庫，求小學信息學奧賽QB教程和試題，看信息學競賽的編程題：求最大公約數（代碼版）「濟南少兒編程_山東少兒編程」，計算機編程:信息學奧賽選拔試題??，供您參考

1.信息學奧賽 1000-入門測試題目

【題目描述】求兩個整數的和。【輸入】一行，兩個用空格隔開的整數。【輸出】兩個整數的和?！据斎霕永? 2【輸出樣例】3

2.信息學奧賽的編程軟件是什么

記得是Pascal吧。不能使用smartdrv驅動的那種環(huán)境。現(xiàn)在也可以用delphi了，記得上次一個朋友告訴我的?？傊畬W習object pascal就沒錯了。

3.信息學奧賽試題（計算機編程）

合并果子。。。。。。。 當然是合并9次了。。。（這個不解釋了，稍微想下就懂了） 合并方法是取兩堆最小的合并，然后把他們的和作為新的一堆，去掉原來的兩堆，再選最小兩堆（新加入的也要比較）。。。。直到只剩1堆 話說這數據很小。。。就合并一次排序一次吧。。。。

4.全面解讀C++信息學奧賽，家長必讀 | 奧林編程

眾所周知，名校自主招生一直是學生和家長重點關注的升學捷徑，作為自主招生中最吃香的學科奧林匹克競賽，多年來一直是很多學生開啟名牌之門的另一把鑰匙。近幾年來，學科競賽中相對冷門的賽事——信息學奧賽，正在受到學校、學生和家長的更多青睞。那么究竟什么是信息學奧賽？參加信息學奧賽有哪些好處？信息學奧賽都考些什么？可能很多家長對此仍然有很多疑問?，F(xiàn)在小編就帶大家一起來了解一下。1. C++信息學奧賽到底是什么？ 信息學奧賽是中學生學科奧林匹克“學科競賽”中的一門，其他四個學科為數學、物理、化學、生物學，學科奧賽是由認可的權威性比賽。信息學，主要是指利用計算機及其程序設計來分析和解決問題的學問。信息學奧賽由中國計算機學會主辦，主要考察信息學，即編程的相關知識和能力，主要包括三級賽事：NOI的官方網站為 C++信息學奧賽對升學和擇校有何幫助？ 作為理科學科競賽之一，信息學的認可度和含金量極高，最直接的好處就是有助于升學，無論是小升初、中考、高考、海外留學，還是申請獎學金、保送研究生，獲得信息學奧賽的好成績都會有重要的助力作用。① 升學擇優(yōu)錄取信息學奧賽獲獎可以享受名牌降分錄取等優(yōu)惠，初中階段參加NOIP獲獎也可作為特長生被重點高中錄取。② 參加自主招生省級獎項可以有資格參加多數重點的自主招生。③ 名牌保送獲得NOI獎牌的選手可以直接保送清華北大等一流名校。④ 當地學校錄取分數線降低部分省市NOIP普及組和提高組其他名次可以享受當地學校降低分數線錄取。⑤ 增強出國留學競爭力奧賽獲獎對申請國外院校也大有幫助，國際競賽獲獎可國外知名錄取，美國、英國、德國、新加坡、日本等發(fā)達對計算機教育普遍重視，認為奧賽獲獎學生的抽象概括和邏輯思維能力遠遠強于其他學生。所以信息學奧賽是幫助孩子圓名校之夢的一個較好選擇。3. C++信息學奧賽對能力拓展和職業(yè)發(fā)展有何幫助？ 信息學競賽能給孩子帶來邏輯思維能力、知識結構和學習能力的巨大提升，學習競賽的過程對于學生的鍛煉遠比學到的知識重要。經過信息學競賽錘煉的孩子，其思維的深度及思考問題的能力更強，更具備在具體學科鉆研和探究的能力。在人工智能時代，編程或許將成為像開車一樣基本的技能，提前具備信息學知識和編程能力，可以更好地面對即將到來的智能時代。在中國12類緊缺人才中，排在第一位的就是“電子信息類”。當前人工智能相關行業(yè)發(fā)展如火如荼，人才需求火爆，包括谷歌、阿里、百度、Facebook在內的巨頭企業(yè)以及人工智能領域的創(chuàng)新先鋒都在瘋搶信息學人才，甚至開出百萬年薪，而這種紅利期還僅僅是剛開始。所以信息學奧賽不僅能提供一塊不錯的升學敲門磚，還可以對孩子整個人生軌跡產生積極影響。2021年初教育部公布高中新課標，將信息學競賽必學內容納入了必修和選修的范疇，更是將“數據和計算”列為必修，提出了“學會一種編程語言”的要求，編程普遍進入高考或許只是時間問題。4. C++信息學奧賽現(xiàn)在的報考情況如何？ 信息學奧賽當前最突出的現(xiàn)狀為：由于信息學不是中學階段的關鍵學科，家長的認知率仍然不高，有些家長甚至都沒有聽說過。所以競賽參與人數相對少，且獲獎比例較高，因此競爭相對不激烈。另外，信息學奧賽還有“比賽多、機會多”的特點，只要有一次考得好，就有機會獲得高?！爸苯愉浫　?、“降一本線錄取”、“降分錄取”等相關優(yōu)惠政策。下面是八大名校在信息學奧賽方面的自招優(yōu)惠政策。另外，信息學競賽的報考情況在各省份很不均衡。以2021年NOIP提高組競賽省一等獎分數線為例，浙江為375分，而河南只有275分，差距有一百分之巨。所以，對于信息學奧賽普及率較低的省份，學生的獲獎機會也更高。 5. C++信息學奧賽相比于其他競賽有何優(yōu)勢？ 信息學相比于其他四門學科有著明顯的優(yōu)勢。首先是難度。學科競賽中，數學和物理奧賽都太“難”，北京數學奧賽金牌教練汪老師曾表示：只有不到5%的學生適合學奧數，其很大程度是拼天賦；而物理則需要學生具備濃厚的興趣和探索精神，而且動輒百萬的報考人數也使難度攀升?；瘜W和生物奧賽一定程度上是考知識積累，由于專業(yè)就業(yè)較難，已日趨邊緣化。信息學奧賽則相對容易一些，有初一的數學基礎就完全可以學習，而且學生基礎水平相當，成績不會有較大差別，所以越早接觸信息學越容易出好成績，而且只要肯下功夫，多半孩子都能拿獎。相比其他學科，信息學是目前發(fā)揮個人潛力最廣，發(fā)展空間最大，專業(yè)選擇面最全的課程。第二是競爭壓力小。雖然近年來報考人數不斷攀升，但與數百萬學習“奧數”的中小學生相比，2021年參加信息學奧賽的考生僅為15 萬，形成強烈的反差。以遼寧省為例，數學奧賽每年5萬人左右參加，而信息學奧賽報考人數只有不到3000人。由于參賽人數上差異大，信息學奧賽在部分省份獲獎率甚至超數學奧賽十數倍。從中可以看出，NOIP信息學一等獎獲獎人數在2021年就已接近一等獎總人數的三成。6. C++信息學奧賽的賽制和賽程是什么？ 信息學競賽主要分為NOIP（青少年信息學奧林匹克聯(lián)賽/分區(qū)聯(lián)賽）、NOI（青少年信息學奧林匹克競賽）、冬令營、選拔賽、IOI（國際信息學奧林匹克競賽）這幾個級別的比賽，競賽的層級次序如圖：NOIP雖然為信息學奧賽的第一站，但其實優(yōu)秀的獲獎者已經有被名校錄取的資格了。比如，今年有3個NOIP高于400分的初中生被清華提前錄取，十幾個被北大提前錄?。ㄖ灰呖歼^一本線即可）。范圍內的NOI競賽，除了省選選手，每個省也會分配一些非正式參賽選手，不參與評獎，但會發(fā)成績證書，也能夠現(xiàn)場和簽約。總體來看，簽約有越來越多、年齡越來越小的趨勢。另外，一些城市也會組織區(qū)級賽（如海淀區(qū)信息學奧賽）和市級賽（如北京市小學生信息學科普日），有志于在奧賽獲獎的孩子可以提前感受考試。下圖是信息學奧賽的競賽時間表：由此可見，信息學奧賽有三個特點：比賽流程較長，前后持續(xù)兩整年；賽事較多，層級不斷提升；機會多，只要有一次發(fā)揮較好，就有機會享受錄取優(yōu)惠。7. C++信息學奧賽考什么？ 信息學奧賽主要考的運用計算機分析問題、設計算法以及上機編程、調試程序的能力。其中對C++的掌握能力是核心，信息學奧賽首先需要學習的就是C++。具體來看，NOIP初試形式為筆試，側重考察學生計算機和編程基礎知識。復試形式為機考，側重考察學生對問題的分析理解能力、數學抽象能力、駕馭編程語言的能力及編程技巧、想象力和創(chuàng)造性。信息學考試的特點和魅力，在于每一次做題都是在“設計”，而不僅僅是被動的測試和做答，每個問題都有實際意義。對于孩子解決問題能力的提高，是其他科目都無法相提并論的。目前NOIP可以使用C、C++和Pascal三種編程語言，而2023年后，NOIP比賽中C和Pascal語言將不再可用，只能使用C++。所以，學信息學，很大程度上就是學習C++。8. 哪些孩子適合學習信息學？ 如果沒有競賽這個前提，編程是誰都可以學的。但是如果是競賽，肯定對學生有一定要求。首先需要對計算機感興趣，興趣是最好的老師，沉浸其中的孩子總會堅持下去；再就是本來成績較好、知識全面發(fā)展的學生更適合學習信息學，因為競賽初衷是讓學有余力的學生拓展學習領域，因為信息學現(xiàn)在不屬于學校教育的科目，如果文化課本身不好，很難花時間學習另一門新的學科。有自控力的孩子也更適合，能坐得住，靜下心來學習是重要基礎，因為信息學學習需要付出心血和汗水。較強的邏輯思維能力雖然不是學習信息學的基石，但會是獲獎的重要元素。9. 應該怎樣著手準備C++信息學奧賽？ 首先是何時開始學習及從什么學起的問題。五年級以下的孩子可以從Scratch學起，早點接觸編程，培養(yǎng)對計算思維和編程的興趣。5-6年級開始學習C++，這時相對復雜的數學和邏輯問題可以更好地理解，并且可以嘗試參加NOIP普及組的競賽，為將來取得更好的成績積累經驗。由于獲得保送只有高一、高二才有機會，因此在初中階段一定要參加NOIP普及組并盡早參與到提高組比賽，以積累實戰(zhàn)經驗，如果初中階段競賽獲獎，也有助于進入重點高中。另外，有一些省份是允許初中生同年同時參加普及組和提高組比賽。下圖是準備信息學奧賽的時間節(jié)奏：根據歷年獲獎選手可以看出，最后獲獎的都是很早就開始學習編程的孩子，而且他們每年的排名都在慢慢地往前。10. 如何報名參加C++信息學奧賽？ 信息學奧賽沒有年齡限制，也就是小學、初中、高中階段的學生都可以報名參加NOIP賽事。初賽一般都是以學校為單位通過指導教師報名（每年9月份開始報名），由指導教師匯總本校學校報名情況并提交給NOI各省特派員，若學校因故不能統(tǒng)一報名，家長可直接聯(lián)系特派員報名（各省特派員的聯(lián)絡方式請見 他們都曾是信息學奧賽獲獎者：20多年前，他們都曾是信息學奧賽獲獎者，現(xiàn)在，他們從事的工作都走在時代前沿。王小川，搜狗CEO，18歲獲得NOI金牌被保送清華，隨后代表中國參加IOI(國際信息學奧林匹克競賽)并獲得金牌。魏小亮，F(xiàn)acebook工程副總裁，1997年獲NOI銀牌，博士畢業(yè)于美國加州理工科學專業(yè)。包塔，美團金融CTO，1996獲得NOI金牌被保送清華，畢業(yè)于清華計算機科學與技術系，獲碩士學位。曾擔任網易有道公司副總裁，是有道創(chuàng)始團隊成員之一，帶領有道詞典和翻譯業(yè)務取得國內同行業(yè)絕對領先地位。 陳磊，拼多多CTO，1996年獲得NOI金牌，博士畢業(yè)于美國威斯康星麥迪遜分校計算機科學專業(yè)。還有很多很多......在這些技術大牛和商界領袖的人生歷程中，信息學奧賽無疑扮演了重要角色，深刻地改變了他們的人生軌跡。信息學奧賽帶給孩子的不僅僅是升學上的便利，在當前人工智能席卷一切的當下，學習信息學更能夠讓孩子搭上早班車，幫助孩子為明天瞬息萬變的社會做準備。

5.推薦幾個信息學(編程)題庫

1.信息學奧賽一本通信息學奧賽一本通（C++版）在線評測系統(tǒng)2.金華信奧OpenJudge - 金華信奧熊老師學習小組 - 首頁3.vijos首頁 - Vijos4.洛谷首頁 - 洛谷 | 計算機科學教育新生態(tài)5.LIB信息學競賽題庫6. Online Judge7.RQNOJ題庫 - RQNOJ8.泉州一中信息學題庫泉州一中信息學題庫9.啊哈添柴在線OJ網站 - 啊哈添柴

6.求小學信息學奧賽QB教程和試題

小學信息學奧賽練習12007-07-20 16:43【練習】 1. 通常在輸入一個正確的程序之后，我們如何運行？ 2. 運行完畢之后，假如按Alt+F5，通常會出現(xiàn)什么顏色的界面？ 3. 如何定義變量abc為整數？ 4. 請完成這樣的程序：從鍵盤輸入一個非零整數，接著在屏幕輸出其10倍 5. 為了計算半徑為30的圓的周長，我們利用公式l=2*pi*r。請解釋下面的程序為何不能輸入3.14 program exe1_5; var pi:integer; begin read(pi); write(2*pi*30); end. 6. 請指出下列語句的錯誤 var a,b,a,3a,begin:integer; 7. 請指出下列程序的錯誤 begin read(a). write(a;3); end; 1、寫出下列程序在turbo pascal下的輸出結果。 program ex; const s='abcdefg'; var i:integer; r:real; c:char;b:boolean; begin i:=1234;r:=1234.5678; c:='#';b:=true; writeln(i,i:6,i:3); writeln(r,r:12:5,r:8:5); writeln(c,c:5); writeln(s,s:10,s:5); writeln(b,b:5,b:3); end 2、編一程序，將攝氏溫度換為華氏溫度。公式為：F=9*C/5+32，其中F為華氏溫度,C是攝氏溫度。 3、編一程序，輸入三角形的三邊a、b、c（假設這三邊可以構成一個三角形），求三角形的面積S？ （提示：可利用海倫公式 1、分析并寫出下列程序的運行結果： program chengji; var s:real;ch:char; begin s:=78.6; if(s>=90)and(s<=100)then ch:='A' else if (s>=70)and(s<90) then ch:='B' else if (s<70) then ch:='C'; writeln(s,'--',ch); End. 2、編寫一與電腦猜"紅"或"黑"的游戲。（先由計算機給出隨機答案，然后由人猜，猜對輸出"YOU WIN"否則輸出"YOU LOST"。） 課內作業(yè)：輸入兩個數a、b，輸出他們的和、差、積。 參考程序： Program xumin0001; Var a,b,he,cha,ji:integer; begin a:=10; b:=12; he:=a+b; cha:=a-b; ji:=a*b; write(he,cha,ji); end. 補充練習： 1、輸入矩形的邊長，分別輸出周長、面積值。 2、輸入兩個整數，輸出它們的平方和它們的平方根。 3、輸入兩個整數，輸出它們相除的整數商（整除值）以及余數。 4、輸入一個時間秒數，分別將其換算為下述時間單位輸出：小時，天，星期 1、輸入矩形的邊長，分別輸出周長、面積值。 2、輸入兩個整數，輸出它們的平方和它們的平方根。 3、輸入兩個整數，輸出它們相除的整數商（整除值）以及余數。 4、輸入一個時間秒數，分別將其換算為下述時間單位輸出：小時，天，星期

7.看信息學競賽的編程題：求最大公約數（代碼版）「濟南少兒編程_山東少兒編程」

大家好！小云老師又來了！在我們前幾篇文章中，小云老師分別給各位家長講解了，用編程實現(xiàn)“雞兔同籠”、“韓信點兵”、“婦人洗碗”以及我們數學題中的“相遇問題”。也用編程帶領同學們做了小游戲，比如“貪吃蛇”、“超級瑪麗”、“坦克大戰(zhàn)”，今天我們還用編程解題“求最大公約數”！可能經常關注我們“速云少兒編程”的家長們說了，前幾篇文章涉足過“求最大公約數”，為什么還需要再講一遍呢？因為今天的編程非“積木式Scratch”編程了，也就是我們傳說中的信息學競賽的編程“求最大公約數”。各位家長快看吧！ 數學是計算機程序設計的靈魂。利用數學方面的知識、數學分析的方法以及數學題解的技巧，可以使得程序設計變得輕松、美觀、高效，而且往往能反映出問題的本質。在各項程序設計比賽（比如，ACM、NOI）活動中，越來越多地用到各種復雜的數學知識，對選手的數學修養(yǎng)要求越來越高。今天奧而思燕老師就帶大家來回顧一下信息學競賽中考核到的數學相關基礎知識之【最大公約數】 最大公約數 一般地，設a1，a2，a3…ak是k個非零整數，如果存在一個非零整數d，使得d|a1,d|a2,d|a3…＂d|ak，那么d就稱為a1，a2，a3…ak的公約數。公約數中最大的一個就稱為最大公約數，記為GCD（a1，a2,a3…ak），顯然它是存在的，至少為1。當GCD＝1時，稱這n個數是互質的或既約的。公約數一定是最大公約數的約數。 一般地，設a1，a2，a3，…ak是k個非零整數，如果存在一個非零整數d，使得a1|d，a2ld，a3ld，…ak|d，那么d就稱為a1，a2，a3，…ak的公倍數。公倍數中最小的一個就稱為最小公倍數，記為LCM（a1，a2，a3，…ak），顯然它也是存在的。公倍數一定是最小公倍數的倍數。 輾轉相除法 輾轉相除法用來求兩個數的最大公約數，又稱歐幾里得算法，其原理就是：GCD（x，y）＝GCD（x，y－x）。 原理的證明如下： 設z|x，z|y，則z|（y－x）。 設z不是x的因子，則z不是x，y－x的公因子。 設z|x，z不是y的因子，則z不是x，y-x的公因子。 代碼實現(xiàn)如下： int GCD(int x, int y) { return y==0? x: GCD(y, x%y)； } 二進制算法 如果想要進一步提高GCD的效率，可以通過不斷去除因子2來降低常數，這就是所謂的“二進制算法”。 （1）若x，y均為偶數，則GCD（x，y）＝2*GCD(x/2,y/2); （2）若x為偶數，y為奇數，則GCD（x，y）＝GCD（x/2,y）； （3）若x為奇數，y為偶數，則GCD（x，y）＝GCD（x,y/2）； （4）若x,y均為奇數，則GCD（x，y）＝GCD（x－y,y）。 代碼實現(xiàn)如下： inline int GCD(int x, int y){ int i,j; if(x==0)return y; if(y==0) return x; for(i=0;0==(x&1);++i)x>>=1／去掉所有的2 for(j=0;0==(y&1);++j)y>>=1／／去掉所有的2 while(1){ If(x＜y）x^＝y(tǒng)，y^＝x，x^＝Y；／若x＜y交換x，y if(0==(x-=y)) return y<<i;< p=""> //若x＝＝y(tǒng)，gcd＝＝x＝＝y(tǒng)（就是在輾轉減， while（1）控制） while（0＝＝（x&1）x＞＞＝1；／去掉所有的2 最小公倍數 求兩個數的最小公倍數可以使用“逐步倍增”法，如求3和8的最小公倍數，可以讓n從1開始逐步加1，不斷檢查8*n是不是3的倍數，直到n=3時，8*3=24是3的倍數了，還可以直接使用以下定理來求解。 定理:a、b兩個數的最大公約數乘以它們的最小公倍數就等于a和b本身的乘積。 比如，要求3和8的最小公倍數,則LCM(3,8)=3*8 div GCD（3,8）=24 擴展歐幾里得算法 擴展歐幾里德算法是用來在已知(a,b)時,求解一組(p,q)，使得 p*a+q*b=GCD(a,b)。 首先，根據數論中的相關定理，解一定存在。 其次,因為GCD(a,b)= GCD(b,a%b)，所以p*a+q*b=GCD(a,b)= GCD(b,a%b)=p*b+q*a%b=p*b+q*(a-a/b*b)=q*a+(P-a/b*q)*b,這樣它就將a 與b的線性組合化簡為b與a %b的線性組合。 根據前邊的結論:a和b都在減小，當b減小到0時，就可以得出p=1,q=0。然后遞歸回去就可以求出最終的p和q了。 代碼實現(xiàn)如下: #include＜ stdio.h＞ //形如ax＋by＝GCD（a，b） int extended _gcd(int a, int b, int &x, int &y){ int ret, tmp; if ( !b)( x=1; y=0; return a; } ret-extended_gcd(b, a% b, x, y); tmp = x; x=y; y= tmp-a/b * y; return ret; } int main() { Int a, b, x, y, z; scanf(“%d%d”,&a, &b); z= extended_ gcd(a, b, x, y); printf（＂%d%d%dn＂，z，x，y）; return 0; } 求解線性同余方程 定理1：對于方程a*x＋b*y＝c，該方程等價于a*x＝c（mod b），有整數解的充分必要條件是：c％GCD（a，b）＝0。 根據定理1，對于方程a＊x＋b*y＝c，我們可以先用擴展歐幾里德算法求出一組x0，y0,也就是a*x0＋b*y0＝GCD（a，b），然后兩邊同時除以GCD（a,b），再乘以c。這樣就得到了方程 a*x0*c／GCD（a，b）＋b*y0*c／GCD（a，b）＝c，我們也就找到了方程的一個解 定理2：若GCD(a，b）＝1，且x0,y0為a*x+b*y=c的一組解，則該方程的任一解可表示為：x=x0+b*t，y=y0-a*t,且對任一整數，皆成立。 根據定理2，可以求出方程的所有解。但實際問題中，我們往往被要求去最小整數解，也就是求一個特解x，t＝ b／GCD（a，b），x＝（x％t＋t）%t。 代碼實現(xiàn)如下： int Extended_Euclid(int a, int b, int& x, int &y)( if(b==0){ x=1 ; y=0 ; return a; } int d=Extended_Euclid(b, a %b, x, y); int temp =x ; x=y ; y=temp-a/b*y; return d; } //用擴展歐幾里得算法解線性方程ax＋by＝c; bool (int a, int b, int c, int& x, int &y){ int d= Extended_Euclid(a, b, x, y); if(c%d) return false; int k=c/d; x*＝k；//＋t*b; y*＝k；／／-t*a; //求的只是其中一個解速云少兒編程-無人機編程_機器人編程_Scratch編程_Python編程

8.計算機編程:信息學奧賽選拔試題

c1 = 138 * 10 + 9Dim n() As Long, s() As String, l As Long, lmax As Long, s_xinxi As Stringl = 0For i1 = 8 To c1 Step 8For i2 = 0 To c1 Step 6For i3 = 0 To c1 Step 5For i4 = 0 To c1 Step 4If i1 + i2 + i3 + i4 = c1 Then ReDim Preserve n(l) '記錄總數 ReDim Preserve s(l) '記錄排列 n(l) = i1 \ 8 + i2 \ 6 + i3 \ 5 + i4 \ 4 s(l) = "8毛:" & i1 \ 8 & "只，6毛:" & i2 \ 6 & "只，5毛:" & i3 \ 5 & "只，4毛:" & i4 \ 4 & "只" If n(l) > lmax Then lmax = n(l) l = l + 1End .Caption = "排列數" & l & "---最多鉛筆數" & lmax & "----計算進度" & Format(i1 * 100 / c1, "00.0") & "%"_xinxi = ""For i = 0 To lmax - 1 If n(i) = lmax Then s_xinxi = s_xinxi & s(i) & vbCrLf End s_xinxi '優(yōu)化代碼c1 = 138 * 10 + 9 '錢數隨便寫 單位毛Dim s() As String, l As Long, lmax As Long, s_xinxi As Stringl = 0lmax = (c1 - 8) \ 4 + 1For i1 = 8 To c1 Step 8 For i2 = 0 To c1 Step 6 For i3 = 0 To c1 Step 5 i4 = c1 - i1 - i2 - i3 If i4 Mod 4 = 0 Then If i1 + i2 + i3 + i4 = c1 And i1 \ 8 + i2 \ 6 + i3 \ 5 + i4 \ 4 = lmax Then ReDim Preserve s(l) '記錄排列 s(l) = "8毛:" & i1 \ 8 & "只，6毛:" & i2 \ 6 & "只，5毛:" & i3 \ 5 & "只，4毛:" & i4 \ 4 & "只" l = l + 1 End If End If If i1 \ 8 + i2 \ 6 + i3 \ 5 + (c1 - i1 - i2 - i3) \ 4 < lmax Then Exit For Next If i1 \ 8 + i2 \ 6 + (c1 - i1 - i2) \ 4 < lmax Then Exit For Next If i1 \ 8 + (c1 - i1) \ 4 < lmax Then Exit ForNexts_xinxi = ""For i = 0 To l - 1 s_xinxi = s_xinxi & s(i) & s_xinxi

如果以上內容沒有幫到您，歡迎電話聯(lián)系我們，或者聯(lián)系在線客服咨詢