P党福音之Variants单元

思量着变量该定义为什么类型?你Out了!用Variants单元可以完美解决!从此,变量定义成任何类型已不是梦!
方法:和加载Math库的方法一样,在第一行写上uses variants即可调用。
注意,此类型的变量只能赋值,不能输入。
请看下面的程序:

uses variants;
var
  x,y:longint;
  a,b,c:variant;
begin
  readln(x,y);
  a:=x;b:=y;
  c:=a+b;
  write(c);
end.

在GUIDE 1.0.2中的运行结果:
P党福音之Variants单元_第1张图片
是不是很完美?
你可能会说,都是一个类型的,刁毛啊,下面这个才是真正的厉害。
P党福音之Variants单元_第2张图片
四个不同类型的转换,系不系很Diao啊233~
注意,有些FP编译器可能不支持,比如在本机Free Pascal IDE2.2.2就无法编译这一程序。
这里写图片描述
那一些在线评测系统支持这个吗?不都支持。测试了一些主流网站,发现洛谷和CV是可以通过的,VJ是MLE(竟然不是CE,有点搞笑啊),POJ是CE。
那么在Linux系统中能过吗?请自己动手实验一下。
此单元博主尚不清楚在NOIP中能否使用,但保险起见最好别用。
附参考资料:见FPC安装目录下doc文件夹中的rtl.pdf
参考目录:C:\FPC\2.2.2\doc\rtl.pdf

你可能感兴趣的:(P党福音之Variants单元)