PASCAL中大小写转化

pascal语言中的大小写有规定吗?~

不用的，pascal是弱语言，除字符串外大小写都没有问题，个人喜好吧，我喜欢关键字的首字母大写（如：Var Begin End Function等）看起来会比较美观。但字符串是区分的（'ABC'和'abc'是不同的两个字符串）。望采纳

1、按“shift+字母” 或按caps lock后直接输入 2、如果你问的是通过程序把小写换大写可以用这个语句： char1{你要换的字母}:=chr(ord('A')-ord('a')+ord(char1));

求采纳

1.大写转小写 lowercase 函数 （一般人我不告诉他！！！！ 秘诀哦 ^_^）

例：ch:=lowercase(ch)
也可利用 ch:=chr(ord(ch)+32) （利用ASCII码关系）

2.小写转大写 upcase 函数 （大家都知道）

例：ch:=upcase(ch)
也可利用 ch:=chr(ord(ch)-32) （利用ASCII码关系）

小写转大写：ch:=chr(ord(ch)-32)或ch:=upcase(ch)。
大写转小写：ch:=chr(ord(ch)+32)或ch:=lowercase(ch)。

小写转大写为：upcase
大写转小写没有程序，要自己写：c:=chr(ord(c)+32);(c为字符)

小转大upcase
大转小lowercase

da := upcase(xiao);
xiao := Chr(Ord(da) - 32);

---

香洲区19655788700： PASCAL中大小写转化 - ？
右贫银菊： 1.大写转小写 lowercase 函数 (一般人我不告诉他!!!! 秘诀哦 ^_^) 例:ch:=lowercase(ch) 也可利用 ch:=chr(ord(ch)+32) (利用ASCII码关系) 2.小写转大写 upcase 函数 (大家都知道) 例:ch:=upcase(ch) 也可利用 ch:=chr(ord(ch)-32) (利用ASCII码关系)

香洲区19655788700： Pascal 在编程中怎么切换大小写?？
右贫银菊： 1、按“shift+字母” 或按caps lock后直接输入 2、如果你问的是通过程序把小写换大写可以用这个语句: char1{你要换的字母}:=chr(ord('A')-ord('a')+ord(char1));

香洲区19655788700： 在free pascal里,怎么将小写字母转化成大写字母 - ？
右贫银菊： var c:char; begin read(c); writeln(chr(ord(c) - ord('a') + ord('a'))); end.

香洲区19655788700： 用pascal语言输入一个字符串,将其中出现的大写字母全部转化为对应的小写字母 - ？
右贫银菊： vari:longint;str,s2:string; begin readln(str);//读入字符串 for i:=1 to length(str) do //用循环扫描,length(str)为字符串str长度beginif str(i) in ['A' ..'Z'] then //判断是否大写s2[i]:=str[i]-32;//大写转小写,s2字符串存放else s2[i]:=str[i];//非大写情况end; write(s2);//输出结果 end. 粗粗些的程序,可能编译还有错误,望采纳

香洲区19655788700： 用Pascal语言,输入一个大写字母(A,Z),把它转换成小写字母输出. - ？
右贫银菊： function big2small(ch:char):char; var s1,s2:string; i:integer; begin s1:='ABCDEFGHIJKLMNOPQRSTUVWXYZ'; s2:='abcdefghijklmnopqrstuvwxyz'; i:=pos(ch,s1); big2small:=s2[i]; end; begin writeln(big2small('R')); end.

香洲区19655788700： pascal 输入5个小写字母,要求转成大写并且按照字母表顺序输出 - ？
右贫银菊： .;A' begin for i:=1 to 5 do begin read(c); a[upcase(c)]:=true; end; for c:='A' to ' do if a[c] then write(c:char; i.'Z']of boolean; c;Z':integervar a:array['

香洲区19655788700： pascal,输入小写字母,输出大写字母(用if,then来做);？
右贫银菊： 伪代码 c:char; readln(c); if (c>='a') and (c<='z') then writeln(chr(ord(c)-96+64)); 谢谢给分

香洲区19655788700： 用ferr pascal做:输入一个小写的字母,把它转换成对应的大写字母输出. - ？
右贫银菊： var ch:char; begin readln(ch); writeln(upcase(ch)); end.upcase就是把小写字母变成大写.如果你的老师不允许直接使用upcase的话,就用ASCLL码,程序如下:var ch:char; begin readln(ch); writeln(chr(ord(ch)-ord('a')+ord('A'))); end.

香洲区19655788700： pascal语言中的大小写有规定吗? - ？
右贫银菊： 有两种情况1.该字母为变量或常量(除了循环变量),则大小写无区别;2.该字母为字符(例如字符串,循环变量),表示一个ACILL码对应的符号,大小写不同.;ACILL码 0:48 A:65 a:97

香洲区19655788700： 1.再键盘上输入六个大写字母,把它转换成对应的大写字母输出.输入:pascal输出PASCAL. - ？
右贫银菊： 小写转大写 var a:array[1..6] of char; i:integer; n:char; begin for i:=1 to 6 do begin readln(n); a[i]:=chr(ord(n)-32); end; for i:=1 to 6 do write(a[i],' '); end.大写转小写 var a:array[1..6] of char; i:integer; n:char; begin for i:=1 to 6 do begin readln(n); a[i]:=chr(ord(n)+32); end; for i:=1 to 6 do write(a[i],' '); end.