UC知道问一个有关pascal语言的问题
来源：百度知道 编辑：UC知道 时间：2024/06/18 15:52:05
program ex;
const s='abcdefg';
var
i:integer;
r:real;
c:char;b:boolean
begin
i:=1234; r:=1234.5678;
c:='#'; b:boolean;
('*');
writeln(i:i:6,i:3);
writeln(r,r:12:5,r:8:5);
writeln(c,c:5);
writeln(s,s:10,s:5);
writeln(b,b:5,b:3);
end.
是么？怪事，这是我们编程老师给我们的，我应该没抄错啊？不好意思，我下个礼拜一上学时再去问问。麻烦各位等等。。。。问完我也会第一时间修改的
顺便再问一下输入一个三位数，将它反向输出的程序该怎么编？
抱歉，第九行是c:='#'；b:=true；
第十行去掉
这下应该对了吧
writeln(i:i:6,i:3); 这句还错了
应该是writeln(i,i:6,i:3);
输出结果“
*
1234 12341234
1.234567800000000E+003 1234.567801234.56780
# #
abcdefg abcdefgabcdefg
TRUE TRUETRUE
”
输入一个三位数，将它反向输出的程序：
1.
var i,n:integer;a:array[1..3]of 0..9;
begin
read(n);a[1]:=n div 100;
a[2]:=n div 10 div 10;
a[3]:=n mod 10;
for i:=3 downto 1 do write(a[i]);
writeln;readln;
end.
2.
var i:integer;s:string[3];
begin
read(s);
for i:=length(s) downto 1 do
write(s[i]);
writeln;readln;
end.
大哥...您这程序是错的啊...
第6行没有‘；’，这还是小事
第九行“b:boolean”是啥意思，定义变量的话应该写在说明部分，如果要赋值的话用赋值语句“:=”而且布尔变量的值只有True和False，第十行，我实在看不懂啊...如果是输出一个星号的话用writeln('*')啊
麻烦LZ改下，改完了我会第一时间回答的
-------------------------------------------------------------------------------
唉，ls好积极啊，况且输出结果的貌似回答得也很周全了，不过ls的那个程序实在有点...大材小用，再说了，字符串数组（就是string[i])我记得i应该是定义字符串的长度啊，没记得还有这作用 <