作业帮 > 综合 > 作业

PASCAL函数与过程练习题2道

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/15 08:54:14
PASCAL函数与过程练习题2道
1、试编写一个将阿拉伯数字转换为中文大写数字的函数.(如中文状态不方便,可以替换为ABCDEFGHIJ)
2、输入一个长字符串和一个短字符串以及一个合适的整数,通过程序从指定位置用指定短字符串替换长字符串中的内容(要求编写过程来实现),最后输出新字符串.
注意:写完了程序最后说明程序大致思想与过程.
不要去复制别人回答的啊!这样不可能选你的
program fh;
var i:integer;
procedure zh(i:integer);
var ch:char;
begin ch:=ord(i+64);
write('ch');
end;
begin writeln('please input a number');
read(i);
if (i>=0)and(i