UC知道简单的pascal程序
来源：百度知道 编辑：UC知道 时间：2024/06/20 12:52:53
我写了一个简单的pascal程序。
大家一看就知道是什么意思。
rogram xuanze2;
var
x,xl:real;
begin
readln('x=',x);
if x>0 then
begin
xl:=x*x;
writeln('xl=',xl);
writeln('x=',xl);
end;
else
begin
writeln('x=',x);
writeln('xl=',xl);
end;
end.
但用Linux下的FPC编译器，编译时提示错误如下：
[root@localhost pascal]# fpc xuanze2.pas
Free Pascal Compiler version 2.2.2 [2008/10/26] for x86_64
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Linux for x86-64
Compiling xuanze2.pas
xuanze2.pas(5,13) Error: Variable identifier expected
xuanze2.pas(12,2) Fatal: Syntax error, ";" expected but "ELSE" found
Fatal: Compilation aborted
大家一看就知道是什么意思。
rogram xuanze2;
var
x,xl:real;
begin
readln('x=',x);
if x>0 then
begin
xl:=x*x;
writeln('xl=',xl);
writeln('x=',xl);
end;
else
begin
writeln('x=',x);
writeln('xl=',xl);
end;
end.
但用Linux下的FPC编译器，编译时提示错误如下：
[root@localhost pascal]# fpc xuanze2.pas
Free Pascal Compiler version 2.2.2 [2008/10/26] for x86_64
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Linux for x86-64
Compiling xuanze2.pas
xuanze2.pas(5,13) Error: Variable identifier expected
xuanze2.pas(12,2) Fatal: Syntax error, ";" expected but "ELSE" found
Fatal: Compilation aborted
readln是不能在括号里加什么字符常量的
可以先 writeln('input x='); 然后 readln(x);
还有 else 前一句不要加分号
1.xuanze2.pas(12,2) Fatal: Syntax error, ";" expected but "ELSE" found指的是：
end;
else
else 的上一句不能有‘；’正确的写法应该是
end
else
2.xuanze2.pas(5,13) Error: Variable identifier expected指的是
当你执行else语句是 x1没有被赋值，所以不能写出，
错误就是这两个而已