VB如何求水仙花数 水仙花数是指一个 n 位数zhidao(n≥3)，它的每个位上的数字的 n 次幂之和等于它本身。（专例如：1^3+5^3+3^3=153）可以属运用将一个 For.Next 循环放置在另一个 For.Next 循环中，组成嵌套循环来解决水仙花求解问题。以3位10进制数100-999为例，代码如下：Private Sub Command1_Click()Dim i As Long，j As Long，k As LongDim s As LongFor i=1 To 9For j=0 To 9For k=0 To 9s=i*100+j*10+kIf((i^3)+(j^3)+(k^3))=s ThenDebug.Print sEnd IfNext kNext jNext iEnd Sub
如何用raptor求所有三位水仙花数，如何用rator求所有三位水仙花数，下面就让我们来看看如何编辑rator吧
C++程序设计 “水仙花数”includeusing namespace std；int main(){cout所有的水仙花数：\"includeincludeusing namespace std；int main(){vector sushu；int i；for(int a=100；a。200；a+){int p=int(a/2)；for(i=2；i。p；i+){if((a%i)=0)break；}if(i=p)sushu.push_back(a)；}cout所有素数：\"includeincludeincludeusing namespace std；int main(){vector number，grade；int x，y；string str；cin>；>；str；for(int i=0；i。10；i+){cin>；>；x；number.push_back(x)；}cin>；>；str；for(int i=0；i。10；i+){cin>；>；y；grade.push_back(y)；}cout全班平均分：\"
