本文主要介绍一下pascal中的goto语句的一些语法和用法：

goto语句的格式：
goto <标号>;

标号语句的格式:
<标号>:<语句>;

功能：
无条件地改变程序执行顺序，直接转向相应的标号语句执行。标号可以是字符或数字，标号后的语句可以是空语句。

注意：
可以在程序的说明部分对标号加以说明，标号说明格式如下：

label <标号表>;

标号表中出现多个定义的标号时，各标号之间用逗号隔开。

例题：
编写计算y=lnx
要求从键盘上输入一个实数x，若x>0,则输出计算结果，若x<=0则显示无解标志"cannnot solve"。

程序代码：
program abcln(input,output);
label a10;
var x,y:real;
begin
write('input real data:');
readln(x);
if x<=0 then
begin
write('cannot solve');
goto a10;
end;
{此处不要else了，因为有goto了}
y:=ln(x);
write('y=',y:6:2);
a10:writeln;
write('thank you');
end.