wdjh.net
当前位置:首页 >> oDD和orD在FrEE pAsCAl里分别是什么用处 >>

oDD和orD在FrEE pAsCAl里分别是什么用处

Chr(N)取序号N所对应的ASCⅡ码的字符 比如Chr(48)就是0 Ord(C)就是取字符C所对应的ASCⅡ码的序号 如Ord(‘0’)=48;

Pascal常用的算术标准函数2009年12月05日 星期六 下午 07:11 一、数学函数: inc(i) 使i:=i+1; inc(i,b) 使i:=i+b; dec(i) 使i:=i-1; dec(i,b) 使i:=i-b; abs(x) 求x的绝对值 例:abs(-3)=3 chr(x) 求编号x对应的字符。例:chr(65)='a' chr(97)=...

Var a:array[1..3] of longint; ch:char; i:longint; Begin for i:=1 to 3 do begin read(ch); a[i]:=ord(ch); end; for i:=3 downto 1 do write(chr(a[i])); End.

uses crt;vars:string;a:integer;k,h,n,j,l:0..9;x:real;beginreadln(a);str(a:0,s);if length(s)=4 then s:='0'+s;k:=ord(s[1])-ord('0');h:=ord(s[2])-ord('0');n:=ord(s[3])-ord('0');j:=ord(s[4])-ord('0');l:=ord(s[5])-ord('0');window(1,...

改成: if (ch>='A') and (ch='a') and (ch='x') or (ch>='X') then write(chr(ord(ch)-23));又: 整个代码如果下面这样,是否能更清晰些? read(ch); case ch of 'A'..'Z' : ch := chr(ord('A') + (ord(ch) - ord('A') + 3) mod 26); 'a'..'z' ...

用 if 语句判断。。 if ch>='A' &&ch

ord() 的意思是求一个字符的 Ascii码。 因为你的程序里的x是用字符读入的,所以不能把它当数字进行运算,要转化成数字。 比如说 ‘0’ 的Ascii码为 48,‘1’~‘9’的Ascii码分别是49~57,所以ord(‘0’)就是等于48的,这里改成ord(x)-48 也是对的。...

program lalalal; var c:char; begin readln(c); case c of 'A'..'Z':writeln('*'); 'a'..'z':writeln('#'); '0'..'9':writeln(c); end; end.

貌似case语句的判断里不可有两点... 这里可改用集合或数组来判断

n:=n*10+ord(rd)-ord('0'); ord(rd)为取字符的序数。char为有序类型。如字符b在a的后面,内码大1。 如果rd为'0'时,ord(rd)-ord('0')的值为0,为'1'是,则是1。 n的初值为零。第一个读进来的数字作个位。 第二个读进来的数字(如果有的话),就...

网站首页 | 网站地图
All rights reserved Powered by www.wdjh.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com