有关pascal教程的几个小问题

来源:百度知道 编辑:UC知道 时间:2024/06/06 12:56:21
何为ascll码值?
请输出一下程序并解释其中的每一步
1输入三个字符,然后按输入字符顺序输出这三个字符,并输出每个字符的序号,最后按与输入字符相反的顺序输出这三个字符。
2 输出一个三位自然数,把这个数的百位与个位数对调,并输出对调后的自然数。
3 如何编写俄罗斯方块游戏程序?请写出程序
选程序可运行、解释浅显者为最佳答案
请为我的程序挑毛病:
版本:turbo pascal
程序:
program 01;
const pi=3.14;
var r,s,c;integer;
begin
readln(r);
s:=pi*r*r;
c:=2*pi*r;
writeln(s,c);
end.

ASCII码的问题你可以参考http://baike.baidu.com/view/15482.htm
ASCII查询http://www.haokucn.com/haocoolfj/onlinetools/htmtools/htm/ASCII/ASCII.htm
其实说白了就是将一些字符对应成数字,你应该知道计算机是把所有的东西都转换成数字储存的吧?

------------------------------------------------

第一个程序:
var
a,b,c:char;
begin
writeln('please input the three letters');
read(a,b,c);
write('1',a,'2',b,'3',c);
writeln;
write(c,b,a)
end.

----------------------------------------------

第二个程序

var x,a,b,c:integer;
begin
writeln('please input the number');
read(x);
c:=x mod 10;{c为个位数字}
b:=x mod 100-c;{b为十位数字}
a:=x div 100;{a为百位数字}
writeln(c*100+b*10+a)
end.