在pascal里如何制作填空题?

来源:百度知道 编辑:UC知道 时间:2024/07/08 02:48:35
老师让把一道应用题用程序做出来,要求输出‘He need to pay (此处输入)yuan.'。
救命!!!!

你说的不清楚
应用题的题目不用编吗,只是输出那行字??

begin
writeln(‘He need to pay ‘,’ ‘,’yuan.’);
end.

用一个整型或字符串型变量Cost接收用户输入,然后将'He need to pay' + Cost + 'yuan' 输出来!

首先没看懂你在问什么
如果你是要采取这种方式输入数据,用这几句话就可以了
write('He need to pay yuan',#8,#8,#8,#8,#8,#8,#8,#8,#8,#8);{注意:pay 和yuan 之间留7个空格}
readln(a);

注:#8是退格符,但不知为什么,此处它会使光标后退而不消除前面的字符,于是就达到了你的要求

如果你要采用这种格式输出数据,那么应该这样
writeln('He need to pay ',cost,' yuan.');
其中cost为整型/短整/长整/实型等数据型变量

你这题目很奇怪,
用crt行吗?
uses crt;
var answer:integer;
begin
gotoxy(1,1);write('He need to 空格 yuan');
gotoxy(15,1);read(answer);

......

end.
应该可以吧
考试不考crt

输出的地方写:
writeln('he need to pay',a,'yuan');
a 代表你所计算出来的结果对应的变量。