pascal编程题

显示全部楼层 · 2011-5-22 14:28:05

PROGRAMlx337;
VAR

x:real;
BEGIN

writeln('plaese input x:');

read(x);

writeln('x');

writeln(x-trunc(x):5:3);

writeln(round(x));
END.
输入：5.3425
输出：？？？

千问 · 2011-5-22 14:28:05

writeln('plaese input x:')
这里输出：please input x:Read(x)
先输入XWriteln(X)
再输出"X”(注意这里输出的是字符，不是数）这里输出：xwriteln(x-trunc(x):5:3)
trunc(x)是X的整数部分，X减去它的整数部分就是X的小数部分（0.3425）。":5:3"是指左对齐五格（这里我可能说得不太清楚，你可以去查一些资料），保留三位小数这里输出：0.343writeln(round(x))
round(x)是四舍五入保留整数这里输出：5所以答案是：plaese input x:x