一些pascal的编程问题 我没时间思考了

1、 用字符输出一个猪锦佳的头像。

2、 a,b,c分别等于1、12、123，把它们按向左对齐、向右对齐的方式打印出来。

3、 输入一个四位整数，把它的各位数字倒序输出。（提示：用MOD和DIV运算完成）

4、 从键盘上读入小写的"pascal"，利用CHR（）和ORD（）函数，输出大写的"PASCAL"。

5、 从键盘上读入一个实数，利用ROUND（）和TRUNC（）函数，输出该实数本身、整数部分、小数部分、四舍五入后的值。
要求：分三行输出 ；输出实数本身时，格式与读入时相同；整数部分、小数部分在同一行输出；其它各占一行。

6、 从键盘上读入长方形的边长a,b，计算它的面积和周长，输出。

7、 输入一个时、分、秒，把它转换为一个秒数。

第一题不看了

第二题:

Var

a,b,c:integer;
Begin
a:=1;
b:=12;
c:=123;
writeln(a);
writeln(b);
writeln(c);
//这样就是左对齐。
writeln(a:3);

writeln(b:3);
writeln(c:3);
//这样就是右对齐。
end.