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.
|