最佳答案:第一题:varx,a,b,c:longint;beginfor x:=10 to 99 dobegina:=x div 10;b:=x mod 10;if (b
最佳答案:vari,k:integer;function f(n:integer):boolean;varx,y:integer;beginf:=false;for x:
最佳答案:这个语句有好多种表达方法,以下是两种最常见的表达方法:1] (a=0) and (b=0) or (c=0)2] not((a0) and (b0) or (c
最佳答案:审题错了吧,求所有素因子意思就像因子分解。比如18 = 2 × 3 × 3你找素因子用的i那个for循环吧,按你的求法,一个因子只能在式子中出现一次。下一次循环
最佳答案:第一题,很简单,我就不说了。varg,s,b,k:longint;begink:=0;for b:=1 to 9 dofor s:=0 to 9 dofor g