KnockCoverOff( Ball );
end
else if MainColor := Blue then
begin
Rollout( Ball );
end
end
else FatalError( "Unrecognized kind of ball.”)
end; case
WhiteAndBlue
18-36
18-36 Pascal
case BallColor of
Blue:
Rollout( Ball );
Orange:
SpinOnFinger( Ball );
FluorescentGreen
Spike( Ball );
White:
KnockCoverOff( Ball );
WhiteAndBlue:
begin
if( MainColor = White ) then
begin
KnockCoverOff( Ball );
end
else if( MainColor = Blue ) then
begin
Rollout( Ball );
end
end
else
FatalError "Unrecognized Kind of Ball "
end case
case