请用PASCAL编程:如何判定一个三位数为水仙花数。
program lianxi06(input,output); Var n,a,b,c:integer;; Begin Write('n=');readln(n); a:=n div 100; b:=(n div 10) -a*10 mod 10; c:=n -a*100-b*10; if n=c*c*c+b*b*b+a*a*a then wirteln(‘yes’) else writeln(‘no’); End.
答:Pascal是学习编程入门语言,和VB差不多,学了过后学其他的简单些,主要学算法,详情>>
答:详情>>