输入一段英文，使其转换成大写输出。（pascal）

pascal编程输入一个大写的英文字母,按菱形的方式输出~

var ch,c1,c:char;
begin
writeln('please input c:');
readln(c);
for c:='A' to c do
begin
write(' ':ord('Z')-ord(c)+9);
for ch:='A' to c do write(ch);
for ch:=pred(c) downto 'A' do write(ch);
writeln;
end;
for c:=c downto 'A' do
begin
write(' ':ord('Z')-ord(c)+10);
for ch:='A' to pred(c) do write(ch);
c1:=pred(c);
for ch:=pred(c1) downto 'A' do write(ch);
writeln;
end;
readln
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.

大写转小写
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 s:string; i:integer;
begin
readln(s);
for i:=1 to length(s) do
write(upcase(s[i]));
writeln;
end.

var str:string;
i:integer;
begin
readln(str);
for i:=1 to length(str) do
write(chr(ord(str[i])-32));
writeln;
end.

---

镶黄旗18560326037： 输入一个英文句子(字符串),将句子中的小写字母转化成大写字母,再输出转化后的句子.(例如,输入“Hello world＂,输出应为“HELLO WORLD”)... - ？
示欣小儿：[答案] #include int main() { char c=getchar(); while(c!=EOF) { if(islower(c)!=0)c=c-32; putchar(c); c=getchar(); } return 0; } 或者对每一位进行ascii码判断,a到z为97到122,大写字母比相应小写小32,找到小写字母减32再输出即可.

镶黄旗18560326037： 输入一句英文,然后将每个单词的第一个字母改为大写,输出最后结果 - ？
示欣小儿：[答案] #include #define N 256 int main() {char a[N]; int i,Flag=0; gets(a); for(i=0;a[i]!=0;i++) {if((a[i]>='A'&&a[i]='a'&&a[i]='a'&&a[i]

镶黄旗18560326037： 把一句英文句子的首字母改为大写(C++)将从键盘上输入的每个单词的第一个字母转换为大写字母,输入时各单词用空格隔开,用'.'结束输入.f如输入:this ... - ？
示欣小儿：[答案] #include using namespace std ;int main(){\x09char s[101] ,ch;\x09int pos = 0 ,flag = 1 ;\x09while( ( ch = getchar() ) != '.' )\x09{\x09\x09if( flag && ch >= 'a' && ch

镶黄旗18560326037： C语言求助:输入一个英文句子,将每个单词的第一个字母改成大写字母. - ？
示欣小儿：[答案] 给一个最粗糙的版本,能实现#includemain(){\x09char str[50];\x09int i,len;\x09printf(＂input a sentence:\n＂);\x09gets(str);\x09len=strlen(str);\x09str[0]=str[0]-32;\x09for(i=0;i

镶黄旗18560326037： C语言 从键盘输入一个字符串,将其中是英文字母的就输出,并且大写输出,否则不输出. - ？
示欣小儿： char chr; int i;for(i=0;i<20;i++){scanf(＂%s%c＂, chr);if (chr>=65&&chr<=(65+26))cprint(＂%c＂,&chr);if (chr>=95&&chr<=(95+26)){chr=chr-30;cprint(＂%c＂,&chr);} }大致是这么个意思,你试试,这个是输入20个字符,你的原题也没说要输入多少

镶黄旗18560326037： 输入一个英文句子(字符串),将句子中的小写字母转化成大写字母,再输出转化后的句子. - ？
示欣小儿： #include<stdio.h> #include<ctype.h>int main() {char c=getchar();while(c!=EOF){if(islower(c)!=0)c=c-32;putchar(c);c=getchar();}return 0; }或者对每一位进行ascii码判断,a到z为97到122,大写字母比相应小写小32,找到小写字母减32再输出即可.

镶黄旗18560326037： 输入一英文句子,将其中所有的单词字符转换成大写后输出(C语言) - ？
示欣小儿： 不知道干嘛要弄那么复杂!//#include ＂stdafx.h＂//vc++6.0加上这一行.#include ＂stdio.h＂ int main(void){ char sentence[1000]; int i; printf(＂Input a sentence...\n＂); gets(sentence); for(i=0;sentence[i];i++) if(sentence[i]>='a' && sentence[i] sentence[i]&=0xDF; printf(＂%s\n＂,sentence); return 0; }

镶黄旗18560326037： 输入一段文章,请将每个单词的首字母从小写转换成大写 - ？
示欣小儿： 以下是用C写的.#include #define STR_LENGTH (1024) void main(void) { char chBuffer[STR_LENGTH]; int nIndex; int strLen; char cChar; nIndex = 0; strLen = 0; memset(chBuffer, '\0', sizeof(chBuffer)); printf(＂please input the string(ENTER to ...

镶黄旗18560326037： 输入一个英文句子,将句子中每个单词的首字母大写后输出. - ？
示欣小儿： Perl有个函数可以将一个串的第一个字母大写,这个函数就是ucfirst(),uc()函数并可以把一个串中的每个单词首字母大写.为了将一个串的每个单词首写字母大写,可以以简单的形式联合ucfirst()和lc()函数.比如:sub UCFirstWords { my (...

镶黄旗18560326037： 如何在word文档设置输入英文一句结束后,下一句字母自动变成大写? - ？
示欣小儿： 可以在Word选项中设置,其具体的操作步骤:1、单击窗口左上角的office 按钮,在弹出的下拉选择中单击word 选项按钮;2、弹出Word选项对话框中,选中“校对”,单击自动更正按钮;3、弹出自动更正对话框,选中句首字母大写复选框即可,如图所示.