7.txt

来自「pl0」· 文本 代码 · 共 7 行

var a,b;
begin
   a:=1;
   b:=32768;
   a:=a/b;
   write(a)
end.