编写一个译码程序 集合

用forvars:ansistring;i,j,k,p:longint;beginreadln(s);fori:=1tolength(s)-1docases[i]of'A'..'Z':write(or

#include#include#include#includeusingnamespacestd;structWord{charword[30];//存放单词//单词总数就是结构体变量数组大小int

vars:ansistring;i:longint;beginreadln(s);fori:=1tolength(s)doifupcase(s[i])in['A'..'Z']thenwrite(ord

#include<stdio.h>main(){    int a[]={0,1,2,3,4,5,6,7,8,9},i; &nb

1.思路：用一个字符串数组储存输入的数据，并分别输出。程序：Vara:array[1..3]ofstring;i:integer;BeginFori:=1to3doReadln(a[i]);Fori:

PrivateSubCommand1_Click()Dima,xAsSinglea=Val(Text1.Text)Ifa再问：x=x+a*0.2+3000*0.2怎么都乘0.2呀？

存在如下问题:1、s重复定义2、i重复定义3、最后一条printf语句少分号4、警告；j定义了,但是没有使用5、你的交换语句a[p]=a[0];只是一个单纯的复制,没有交换.6、警告：main函数返回

开始输入两个数吧!#include#includemain(){inti,j,m,n,t,a[100]={0};printf("inputm,n:");scanf("%d%d",&m,&n);for(

while(a){case‘1‘intn=rand（）%10;break;case‘1‘intn=10+rand（）%100;break;case‘1‘intn=100+rand（）%1000;bre

programa4;vara,b,c:integer;beginreadln(a,b,c);if(((a>0)and(b>0)and(c>0))and((a+b>c)and(a+c>b)and(b+c

input(x)ifx

这个可以这样做~cleara=rand(10,1);%产生一组随机数b=rand(10,1);%产生另一组随机数b=b-(dot(a,b)/dot(a,a)).*a;%可以使用施密特正交化的方法转化d

Stringresult=sentence.replaceAll("a","1").replaceAll("b","2").;依此写这个可以查API的

varn,i,min,max,maxi,mini,s:integer;x:array[1..100]ofinteger;ans:real;beginreadln(n);fori:=1tondoread

#includeintmain(){charcypher[4]="Love"，code[4];constintN=26;inti=0,n;printf("pleaseinputthekeys:\n")

pt = {2, 2};ContourPlot[ Sqrt[(x - pt[[1]])^2 + (y -&nb

#include <stdio.h>int main(){  float x, tax = 0; 

/>vart;varl=prompt('请输入边长',3.5);t=3.1415926*(l/2.0)*(l/2.0);document.write("边长:"+l);document.write("

好像用数组比较好做

programdaihuan;vars,e,tmp:string;i,j,k,l:integer;t:char;procedureswap(t:char);begincasetof'a':tm