编写一个译码程序,把一个英语句子译成数字代码.译码规则是以数字1代替字母A,数字2代替字母B,……,26代替字母Z,如遇空格则打印一个星号‘*’,英文句子以‘.‘结束.大家帮个忙,(注:答案
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/26 23:10:05
![编写一个译码程序,把一个英语句子译成数字代码.译码规则是以数字1代替字母A,数字2代替字母B,……,26代替字母Z,如遇空格则打印一个星号‘*’,英文句子以‘.‘结束.大家帮个忙,(注:答案](/uploads/image/z/9231278-14-8.jpg?t=%E7%BC%96%E5%86%99%E4%B8%80%E4%B8%AA%E8%AF%91%E7%A0%81%E7%A8%8B%E5%BA%8F%2C%E6%8A%8A%E4%B8%80%E4%B8%AA%E8%8B%B1%E8%AF%AD%E5%8F%A5%E5%AD%90%E8%AF%91%E6%88%90%E6%95%B0%E5%AD%97%E4%BB%A3%E7%A0%81.%E8%AF%91%E7%A0%81%E8%A7%84%E5%88%99%E6%98%AF%E4%BB%A5%E6%95%B0%E5%AD%971%E4%BB%A3%E6%9B%BF%E5%AD%97%E6%AF%8DA%2C%E6%95%B0%E5%AD%972%E4%BB%A3%E6%9B%BF%E5%AD%97%E6%AF%8DB%2C%E2%80%A6%E2%80%A6%2C26%E4%BB%A3%E6%9B%BF%E5%AD%97%E6%AF%8DZ%2C%E5%A6%82%E9%81%87%E7%A9%BA%E6%A0%BC%E5%88%99%E6%89%93%E5%8D%B0%E4%B8%80%E4%B8%AA%E6%98%9F%E5%8F%B7%E2%80%98%2A%E2%80%99%2C%E8%8B%B1%E6%96%87%E5%8F%A5%E5%AD%90%E4%BB%A5%E2%80%98.%E2%80%98%E7%BB%93%E6%9D%9F.%E5%A4%A7%E5%AE%B6%E5%B8%AE%E4%B8%AA%E5%BF%99%2C%EF%BC%88%E6%B3%A8%EF%BC%9A%E7%AD%94%E6%A1%88)
xJ@_evieLX1M4$! "Z_SBmEb+KLꪯd45$gn&')r:
xurսnrET= ='uT=4o7u˛(|,8R,ʼnl%rÉr
{[ԝ#_ap
^v~m;m|,yb]=#ن>kes*c|M,? Λh"'TWf t59^5e2d53M.sfdEԴ2D>3727QXiAZm7E@.s^^Vm,òL@Z3dKhF:9S XdE
"H OAOۀ 1,ր2Rȣ!2 Lڙ1f7cΫI4\H
编写一个译码程序,把一个英语句子译成数字代码.译码规则是以数字1代替字母A,数字2代替字母B,……,26代替字母Z,如遇空格则打印一个星号‘*’,英文句子以‘.‘结束.大家帮个忙,(注:答案
编写一个译码程序,把一个英语句子译成数字代码.译码规则是以数字1代替字母A,数字2代替字母B,……,26代替字母Z,如遇空格则打印一个星号‘*’,英文句子以‘.‘结束.
大家帮个忙,(注:答案最好是pascal的)
编写一个译码程序,把一个英语句子译成数字代码.译码规则是以数字1代替字母A,数字2代替字母B,……,26代替字母Z,如遇空格则打印一个星号‘*’,英文句子以‘.‘结束.大家帮个忙,(注:答案
用 for
var
s:ansistring;
i,j,k,p:longint;
begin
readln(s);
for i:=1 to length(s)-1 do
case s[i] of
'A'..'Z': write(ord(s[i])-64);
end;
end.
用 while
var
ch:char;
begin
read(ch);
while ch'.' do
begin
case ch of
'A'..'Z': write(ord(ch)-64);
' ': write('*');
end;
read(ch);
end;
end.