Freepascal编程输入一个圆的半径r,求圆的面积和周长

一：#includevoidmain(){inta,i=0,sum=0;scanf("%d",&a);while(a){sum+=(a%10);//sum是个位数之和a/=10;i++;//i为位数}

测试通过,基本满足你题目要求,写得不太好importjava.util.*;importjava.util.regex.*;publicclasst10{publicstaticvoidmain(St

clearinput"请输入第1个数："toainput"请输入第2个数："tobc=min(a,b)dowhilec>0ifa%c=0andb%c=0s=cexitendifc=c-1enddo?"

就是I从1循环到4AE(1,JJ),AE(2,JJ),AE(3,JJ),AE(4,JJ)Fortran一种特色写法

1.main(){inta,b;scanf("%d%d",&a,&b);printf("%d%d",((int)a/b),a%b);}2.main(){inta,b;scanf("%d",&a);b=

楼上是C++写的,这个是C语言版的#include#includeintmain(){intcount;int*arrayLenth;int**intArray;int*elem1,*elem2;in

这个要用到栈了,碰到左括号("(、[、{")则压栈,碰到右括号则出栈,结束后判断栈是否为空,如果为空则说明匹配,否则不匹配.再问：对。兄弟说的是这么个意思。就是第二步还没弄出来。。再答：每次压栈后都将

PrivateSubCommand1_Click()Dima#,b#,c#,p#Me.AutoRedraw=Truea=3:b=4:c=5Doa=Val(InputBox("请输入三角形第一条边","

#includeintmain(){intm[10],i,j=0,k;longn;scanf("%ld",&n);k=n;while(k>0){k/=10;j++;}i=j;while(i--){m[

//prob.cpp:Definestheentrypointfortheconsoleapplication.//#include"stdafx.h"#include//#includeusingn

#includeintmain(){intx,i,n;doubley;printf("Inputainteger:");scanf("%d",&x);n=1;y=0.0;for(i=1;i

新的数字放在数组最后向前循环比较大小,进行位置调换亦可如下方式：dimea(5)FORi=1TO4a(1)=17a(2)=36a(3)=45a(4)=65ENDFORb=46FORi=4TO1STEP

Subtest()DimNumAsLong,Arr(1To5)Forn=1ToUBound(Arr)Num=Application.InputBox("请输入第:"&n&"个数字:","数字输入窗口"

#include<stdio.h>void fanxu(int c[], int j);void main(){\x09int 

#include#include#defindPI3.141592654main(){doublevolume;floatradius;printf("Inputradius:");scanf("%f

varn,i,j,k:integer;beginreadln(n);fori:=1tondobeginforj:=1to3dobeginwrite('':n-i+1);fork:=1toi+i-1do

#include看math.h里有没有M_PI,如果没有,就自己定义#defineM_PI3.14159265358979323846

简单呀.抛硬币次数不是实验次数,最好把题目说明白,你可能不知道怎么输出保留俩位小数估计printf("%.2f",x);再问：就是抛固定次数的硬币的试验次数再答：你看看你的要求输入抛硬币次数和试验次数

这个可以PrivateSubForm_Load()DimaAsStringa=Right(InputBox("输入"),1)SelectCaseAsc(a)CaseAsc("a")ToAsc("z")

#includeusingnamespacestd;intmain(){doubler;doublev;constdoublepi=3.14159;cout再问：运行程序有一个错误..我找不到