fpc/tests/webtbs/tw3900.pp
2005-04-25 09:48:54 +00:00

9 lines
82 B
ObjectPascal

{$Q+}
uses math;
var s1,s2:byte;
begin
s1:=2;
s2:=77;
writeln(0-min(s1,s2));
end.