7 lines
78 B
ObjectPascal
7 lines
78 B
ObjectPascal
begin
|
|
var i := 1;
|
|
case i of;
|
|
1:Write(2);
|
|
else Print(666)
|
|
end
|
|
end. |