入门经典题循环

入门经典题循环编程求135NINPUT输入一行，只有一个整数N132767，所以需要长整型。23题编程求123NINPUT输入一行，只有一个整数N1MAXTHENMAXXIFX0DOBEGINABBRRAMODBENDWRITENDIVBENDPROGRAMEX_29VARA,B,RLONGINTBEGINREADA,BRAMODBWHILER0DOBEGINABBRRAMODBENDWRITEBEND某动物饲养中心用X元专款购买小狗每只A元和小猫每只B元两种小动物。要求专款专用,至少猫狗各一,正好用完请求出方案的总数。如没有请输出0INPUT输入一行，只有三个整数分别为X,A,B1001THENSUMSUM1WRITESUMENDPROGRAMEX_32VARN,COUNT,I,G,S,BINTEGERBEGINREADNCOUNT0FORI100TONDOBEGINGIMOD10BIDIV100SIDIV10MOD10IFGGGBBBSSSITHENINCCOUNTENDWRITECOUNTENDPROGRAMEX_32VARN,COUNT,I,A,BINTEGERBEGINREADNCOUNT0FORI1TONDOIFIMOD50THENBEGINAIREPEATBAMOD10AADIV10IFB5THENBEGININCCOUNTBREAKENDUNTILA0ENDWRITECOUNTENDSAMPLEINPUT3SAMPLEOUTPUT9HINT本题可以用一重循环，也可以两重循环,可以分别用循环语句的三种形式来完成这道题目。FOR循环WHILE。DO循环REPEAT。UNTILE循环PROGRAMEX_34VARN,I,JINTEGERS,TLONGINTBEGINREADNS0FORI1TONDOBEGINT1FORJ1TOIDOTTJSSTENDWRITESEND35题素数的个数编程求正整数M与N之间的所有素数的个数（MDOBEGINCASECHOFAZINCSUM1AZINCSUM209INCSUM3ENDREADCHENDWRITESUM1,SUM2,SUM3ENDPROGRAMEX_37VARN,ILONGINTFBOOLEANBEGINREADNFTRUEFORI2TOTRUNCSQRTNDOIFNMODI0THENBEGINFFALSEBREAKENDIFN1THENFFALSEIFFTRUETHENWRITETELSEWRITEFEND没有一个数能整除A，则A是质数。）38题任意输入一正整数N，要求把它拆成质因子的乘积。任意输入一正整数N，求出它的所有质因子。如10（25）；20（225）。INPUT输入只有一行，包括1个整数。OUTPUT输出只有一行SAMPLEINPUT36SAMPLEOUTPUT2233VARN,I,J,KLONGINTBEGINREADLNNKNWHILEK1DOBEGINFORI2TONDOIFKMODI0THENBEGINWRITEI,BREAKENDKKDIVIENDEND39题求恰好使S11/21/31/N的值大于X时N的值。2XWRITENEND40题打印字母塔输入行数N,打印图形INPUT输入只有一行，包括1个整数。N15OUTPUT输出有N行SAMPLEINPUT3SAMPLEOUTPUTABABCBABCPROGRAMEX_39VARN,I,JINTEGERBEGIN