程序一:读入两个数,将大数存于x,小数存于y。(练习IF语句) PROGRAM larger(input,output); VAR x,y,temp:real; BEGIN read(x,y); writeln('x=',x:8:2,'y=',y:8:2); IF x<y THEN BEGIN temp:=x; x:=y; y:=temp END; writeln('x=',x:8:2,'y=',y:8:2) END.
我不管运行哪个程序都出现这个提示,是不是PASCAL 7.0 安装的有问题,我用的是 WINDOWS XP.
PROGRAM larger(input,output);
VAR
x,y,temp:real;
BEGIN
read(x,y);
writeln('x=',x:8:2,'y=',y:8:2);
IF x<y
THEN BEGIN
temp:=x;
x:=y;
y:=temp
END;
writeln('x=',x:8:2,'y=',y:8:2)
END.
不是用"."的,而是用分号";"