Delphi运行时弹出debugger exception notification对话框，而且程也会卡死，进程无响应。

Question

procedure TForm1.Button1Click(Sender: TObject);
var
a,b,c,max:real;
begin
readln(a,b,c);
if a > B then max:=a
else max:=b;
if c>max then max:=b;
writeln ('max=' ,max);
end;
end.
不止这个代码，有时候照着书做其它的也会出现，请问是Delphi7软件有问题还是代码有问题？

Answer 1

1、肯定是你的代码有问题，delphi7是最稳定的delphi版本；
2、delphi的windows GUI模式编程时已经不支持使用readln语句去直接读键盘了 ！ 请改用delphi的控制台模式（即dos模式）编程 ！